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IDENTIFICATION 


PRODUCT CODE: AC-F612A-MC 
PRODUCT NAME: CKKTBAO 11/44 MEM MGMT PRT B 


DATE: OCTOBER, 1979 
MAINTAINER: DIAGNOSTIC ENGINEERING 
AUTHOR: J. PETER BRADY 


THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES 
ee ere FOR ANY ERRORS THAT MAY APPEAR IN THIS 


THE SOFTWARE DESCRIBED IN THIS “yrs IS FURNISHED TO THE 
PURCHASER UNDER A LICENSE FOR USE ON A SINGLE COMPUTER SYSTEM 
AND CAN BE COPIED (WITH INCLUSION OF DIGITAL’S COPYRIGHT NOTICE) 
ONLY FOR USE IN SUCH SYSTEM, EXCEPT AS MAY OTHERWISE BE PROVIDED 
IN WRITING BY DIGITAL. 


DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY 
FOR THE USE OR RELIABILITY OF ITS SOFTWARE ON EQUIPMENT 
THAT IS NOT SUPPLIED BY DIGITAL. 


COPYRIGHT (C) 1979 BY DIGITAL EQUIPMENT CORPORATION 


SEQ 0001 





CKKTBAO 11/44 MEM MGMT PRT 6B MACRO M1111 25=SEP=79 12:24 PAGE 3 


PROGRAM HISTORY 
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PROGRAM INFORMATION 


THIS PROGRAM WAS DESIGNED USING A ‘BOTTOM UP’ APPROACH 
STARTING WITH THE SMALLEST SEGMENT OF MEMORY MANAGMENT 
LOGIC POSSIBLE AND BUILDING TO COVER ALL OF THE LOGIC. 
THE DIAGNOSTIC WILL PROVIDE ENOUGH INFORMATION SUCH THAT 
BY DEDUCTION, THE FAILURE CAN BE ISOLATED TO A SMALL 
SEGMENT OF THE MEMORY MANAGEMENT LOGIC. 


PART A BEGINS BY TESTING SOME OF THE INTERNAL “* — 
AND ADDRESS PATHS AND ADDRESS DETECTION LOGIC, 
T THROUGH THE MEMORY MANAGE 


WORKS OUTWARD . 

AFTER THE REGISTERS ARE FOUND TO BE USEABLE, RELOCATION 
(CONSTRUCTION OF PHYSICAL ADDRESSES FROM A VIRTUAL ADDRESS 
AND THE ASSOCIATED PAR/PDR INFORMATION) IS TESTED. PART B 
BEGINS BY TESTING THE ABORT AND STATUS SEGMENTS OF LOGIC. 
PART B THEN CHECKS THE SPECIAL ABORT SEQUENCES, THE MFPI/MTPI 
INSTRUCTIONS AND THE CSM INSTRUCTION. 


REQUIREMENTS 


A PDP 11/744 PROCESSOR WITH A MINIMUM OF 16K OF MEMORY 
AND A CONSOLE TERMINAL ARE REQUIRED TO RUN THE PROGRAM 
UNLESS THE PROGRAM IS RUNNING UNDER APT OR ACT IN WHICH 
CASE THE CONSOLE TERMINAL IS NOT NECESSARY. 


RELATED DOCUMENTS AND STANDARDS 


1 ACT11/XXDP_ PROGRAMMING SPECIFICATION 

cs STANDARD APT SYSTEM TO A PDP11 DIAGNOSTIC INTERFACE 
Be DIAGNOSITC ENGINEERING STANDARDS AND CONVENTIONS 
4. PDP11 MAINDEC SYSMAC PACKAGE 

5 XXDP USER'S MANUAL 


BEFORE THIS MEMORY MANAGEMENT DIAGNOSITC IS RUN, THE 
FOLLOWING DIAGNOSTICS SHOULD BE RUN: 


CKKAAAO : 1/4 CPU/EIS 
CKKABAO TRAPS 


ALSO, THE MAIN MEMORY DIAGNOSTIC (CZMSD) SHOULD BE RUN TO SCAN 
AT LEAST THE FIRST 16K TO SEE THAT A PROGRAM CAN BE EXECUTED. 


OPERATING INSTRUCTIONS 


SEQ 0004 
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THE PROGRAM IS SUPPLIED ON THE DIAGNOSTIC LOAD MEDIA. 
REFER TO THE XXDP USER'S MANUAL FOR FURTHER INFORMATION. 
FOR USE WITH ACT OR APT, REFER TO THEIR RESPECTIVE 
DOCUMENTS. THE PROGRAM CAN ALSO BE DIRECTLY LOADED 
USING THE ABSOLUTE LOADER AND THE BINARY PAPER TAPE. 


STARTING PROCEDURES 


a a ae cal et atl cba eel onl cel 
DAA AAAA AIT 
WODWNAWUSWRO 


S 


THE PROGRAM IS STARTED BY LOADING ADDRESS 200 AND 

STARTING. THE ot Bh REGISTER SHOULD BE SET ACCORDING TO 
SECTION 2.3 BEFORE THE PROGRAM IS STARTED. HOWEVER, IF 
DESIRED, THE PROGRAM WILL USE THE SOFTWARE SWITCH REGISTER 
AT LOCATION 176 ee coe 174 WILL BE USED AS THE SOFTWARE 
DISPLAY REGISTER). IN THAT CASE, THE PROGRAM WILL ASK FOR 
THE INITIAL gpk REGISTER VALUE TYPING ‘‘SWR= XXXXXX 
NEW= ‘* AFTER TYPING THE NAME OF THE PROGRAM (XXXXXX = 
THE OCTAL CONTENTS OF LOCATION 176). (SEE SECTION 2.4) 


ALSO THE PROGRAM CAN BE MADE TO USE THE SOFTWARE SWITCH 
REG. EVEN IF THE CONSOLE SWITCH REG. IS PRESENT BY LOADING 
‘177777'* INTO THE CONSOLE SWITCH REG. BEFORE STARTING 

THE PROGRAM. 


CONTROL SWITCH SETTINGS 


OCTAL VALUE 
100000 HALT ON ERROR 
ae ig waetote WHEN SET WILL HALT 
THE PROCESSOR WHEN AN ERROR IS 
DETECTED AFTER THE ERROR MESSAGE 
HAS BEEN TYPED. PRESSING CONTINUE 
WILL RESUME TESTING (SEE SECTION 
3.1 ABOUT LOADING THE SWITCH REG 
BEFORE CONTINUING). 


040000 TEST 
THIS SWITCH WHEN SET WILL 
CAUSE THE PROGRAM TO LOOP ON 
THE CURRENT SUBTEST. 


020000 INHIBIT ERROR TYPEOUTS 
THIS SWITCH WHEN SET WILL 
INHIBIT THE TYPING OF ERROR 
MESSAGES. 


010000 INHIBIT TRACE TRAP 
THIS SWITCH WHEN SET WILL 
INHIBIT T-BIT TRAPPING WHICH 
NORMALLY TAKES PLACE DURING 
EVERY OTHER PASS STARTING 
WITH THE THIRD PASS. 


002000 BELL ON ERROR 


177 
178 
179 
180 
181 
182 
183 
184 
185 
186 
187 
188 
189 
190 
191 
192 
1$3 
194 
195 
196 
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207 THIS SWITCH WHEN SET WILL RING 
208 THE CONSOLE TERMINAL BELL WHEN 
AN ERROR HAS BEEN DETECTED. 


8 


Sw9 001000 ERROR 

THIS SWITCH WHEN SET WILL 

CAUSE THE PROGRAM TO LOOP ON THE 
FIRST FAILURE WHICH IS ENCOUNTERED 
EVEN IF THE FAILURE IS INTERMITTANT 


Sw8 000400 fEST IN SWR<7:0> 
THIS SWITCH WHEN SET WILL 
CAUSE THE PROGRAM TO LOOP ON THE 
TEST WHOSE TEST NUMBER IS SET 
IN BITS 7-0 OF THE SWITCH REG. 


MoNMMNONONPENEN NP 
aod cath aad cad cath cad cad 


anh th oe 
OBDNAULSWN-O 


LOADING THE SWITCH REGISTER 


THE CONSOLE BY TYPING A CONTROL P (“P), 

PROMPT IS RECIEVED, TYPE *D SW XXXXXX'', 

INTENDED VALUE OF THE SWITCH REGISTER. UE THE 

CONSOLE SWITCH REG. CAN BE CHANGED ANY TIME WHETHER THE PROGRAM 
IS RUNNING OR NOT. 


TO LOAD THE SOFTWARE i's aot ye THE PROGRAM IS 


Ss 
I G B -) THE ORIGINAL VALUE OF THE SOFTWARE 
SWTICH REG. WILL BE REQUESTED AS MENTIONED IN SECTION 2.2. 


IN RESPONSE TO A “G OR AT THE BEGINNING OF THE PROGRAM, THE 
PROGRAM WILL TYPE: 


SWR = XXXXXX NEW = 


WHERE *'XXXXXX°" IS THE CURRENT OCTAL ena 4a OF LOC. 176. 
THE OPERATOR MAY THEN TYPE ANY ONE OF THE FOLLOWING: 
XXXXXX<CR> ONE TO SIX fle DIGITS FOLLOWED BY A 
CARRIAGE R WHICH WILL BE LOADED 
AS_THE NEW VALUE FOR THE SWITCH REG. 
<CR> AS IT as. LEAVES THE SWITCH REG. 
XXX*U ONTROL-U (“*U) WILL CAUSE ALL OF THE 
DIGITS TYPED SO FAR TO BE IGNORED. 
“< WILL CAUSE THE PROGRAM TO TYPE THE PRESENT 
TEST AND PASS NUMBERS, REQUEST A NEW VALUE 
FOR THE SWITCH mts AND JUMP TO THE END- 
OF=PASS ROUTINE SO THE PROGRAM WILL GO DIRECTLY 
TO THE NEXT PASS WITH A NEW SW. REG. VALUE 
<ILL.CHAR> ANY CHARACTER TYPED WHICH IS NOT ANY OF THE 
E OR AN OCTAL DIGIT WILL CAUSE THE PROGRAM 
TO TYPE A ‘*?<CRLF>'' AND REACT AS THOUGH A 
“U HAD BEEN TYPED. 


NOTE: RECOGNITION OF A “G MAY BE HAMPERED BY 
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ieee er dae St Te ek EXECUTION OF A COUPLE ‘RESET’’ INSTRUCTIONS 

265 WITHIN THE PROGRAM. 

267 2.5 EXECUTION TIMES 

eS ee Pe ee ne 

270 THE RUN TIME FOR A SINGLE PASS WITH TRACE TRAPPING 

al ENABLED IS APPROXIMATELY 5 SECONDS WITH CACHE. 

273 3.0 ERROR INFORMATION 

2 is i ee ee ene een enlace 

275 

276 3.1 ERROR REPORTING PROCEDURES 

a a igh OT es en eee 

279 IF AN ERROR IS DETECTED, THE PROGRAM WILL TRAP TO THE 
280 ERROR HANDLING ROUTINE (S$ERROR). THE VALUE OF BITS 

281 15,13,10, AND 9 IN THE SWITCH REGISTER ARE CONSIDERED 
282 IN REPORTING AN ERROR (SEE SECTION 2.3). THE 

285 ERROR INFORMATION WILL BE TYPED UNLESS SW13 = 

285 IF SW15 = 1, THE PROCESSOR WILL HALT AFTER THE ERROR IS 
286 REPORTED. IF THE CONTENTS OF THE SOFTWARE SWITCH REGISTER 
287 ARE TO BE CHANGED, A *G SHOULD BE TYPED BEFORE PRESSING 
288 "‘CONTINUE’’ TO RESUME TESTING. 

290 IF SW9 = 1 (LOOP ON ERROR), THE PROGRAM WILL GO TO THE 
291 ADDRESS CONTAINED IN LOCATION "SLPERR''. AFTER REPORTING 
292 THE ERROR. ‘SLPERR'' iS SET BY EACH ‘'SCOPE'’ CALL AND IS 
293 SET DIRECTLY DURING SOME SUBTESTS TO PROVIDE THE SMALLEST 
294 LOOP FOR LOOPING ON ERROR. IF SW9 = 0, THE PROGRAM WILL 
295 RETURN TO THE INSTRUCTION FOLLOWING THE ERROR CALL. 

296 (SEE SECTION 5.3 FOR MORE ON ‘LOOP ON ERROR’'). 


298 3.2 INTERPRETING ERROR REPORTS 


299 -------------=------=-= === 


301 EVERY ERROR REPORT TYPES THE Ss OF THE TEST IN mo 


302 THE ERROR TOOK PLACE (TESTNO) AND THE LOCATION OF 

303 ERROR CALL (ERRORPC). THESE TWO VALUES PINPOINT THE 

304 PLACE IN THE CODE THAT THE ERROR OCCURRED. BY REFERRING 
305 TO THE PROGRAM LISTING, THE OPERATOR CAN THEN READ THE 

306 COMMENTS ASSOCIATED WITH THAT PARTICULAR ERROR AND SUBTEST. 
307 A DESCRIPTION OF THE TEST FOUND IN THE PROGRAM LISTING 

308 WILL ALSO PROVIDE THE OPERATOR WITH INFORMATION ON THE LOGIC 
309 AND FUNCTIONS BEING TESTED. 


EVERY ERROR REPORT ALSO TYPES AN ERROR MESSAGE 
GIVING A VERBAL DESCRIPTION OF THE ERROR THAT HAS 
BEEN DETECTED. 


BY USING THE COMMENTS AND TEST DESCRIPTION FOUND IN 
THE PROGRAM LISTING TO DETERMINE WHAT FUNCTION OR 
LOGIC WAS BEING TESTED, THE OPERATOR CAN THEN REFER 
TO THE ENGINEERING DRAWINGS TO ISOLATE THE PROBABLE 
CAUSE FOR THE FAILURE. 


WIWNIWWNWNWN NIN WNWINW 


tS St Ses SS 
SOONAMUSWH-O 





3.3 SAMPLE ERROR REPORT 


BELOW IS AN EXAMPLE OF AN ERROR WHICH COULD HAVE 
OCCURRED DURING EXECUTION OF THE PROGRAM: 


MEM. MGMT. REG. BITS . il BR phy 
REGISTR WROTE READ NARY) 

ADDRESS (OCTAL) (OCTAL) 5432109876943210 TESTNO ERRORPC 
177572 040000 060000 0110000000000000 000012 022060 


WE SEE THAT THE ERROR OCCURRED IN TEST 12 AT LOCATION 
022060. THE ‘REGISTER og TELLS US THAT WE WERE 
TESTING MEMORY MANAGEMENT'S STATUS RGISTER 0 (SRO). 
IN THE LISTING, THE TEST DESCRIPTION SAYS THAT THE 
ERROR BITS (BITS <15:13>) OF SRO WERE BEING SET AND 
CLEARED INDIVIDUALLY. THE ERROR REPORT SAYS WE TRIED 
TO SET BIT 14 BY WRITING *040000°" TO SRO BUT WHEN WE 
READ IT BACK WE READ *060000°'. IT APPEARS THAT BIT 13 IS 
_ STUCK AT '1'' OR IT IS GETTING SET WHEN BIT 14 IS SET 
TO ‘‘l’*. ERROR REPORTS BEFORE AND AFTER THIS ONE COULD 
TELL US WHICH IS THE CASE. 


MISCELLANEOUS INFORMATION 


THE PROGRAM IS FULLY ACT AND APT COMPATABLE 
AND IS SUPPORTED UNDER THE XXDP PACKAGE. 


END-OF =PASS MESSAGE 
AT THE END OF EACH PASS OF THE PROGRAM THE PASS NUMBER 
AND TOTAL NUMBER OF ERRORS SINCE THE LAST END-OF-PASS ARE 
REPORTED IN THE END-OF-PASS MESSAGE. FOR EXAMPLE: 

END OF PASS #2 TOTAL ERRORS SINCE LAST REPORT 0 


THAT WOULD INDICATE THAT PASS TWO “ at's State 
AND NO ERRORS -_y* DETECTED DURING THAT PASS. 


BOTH 
THE PASS NUMBER AND NUMBER OF ERRORS ARE DECIMAL NUMBERS. 
T-BIT TRAPPING 


THE *'T-BIT’* (BIT 4) IN THE PROCESSOR STATUS WORD IS SET 

BY AN 'RTI"' IN THE END-OF-PASS ROUTINE FOR s wel OTHER PASS 
BEGINNING WITH THE THIRD PASS (PASSES 3,5,7.9.. T-BIT 
TRAPPING CAN BE oop oY SETTING BIT i2°= 1 1 THE SWITCH 
REGISTER (SEE SECTION 2.4 


POWER FAILURE HANDLING 
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IF A POWER FAIL OCCURS (FOLLOWED BY A POWER UP), THE 
MESSAGE ‘POWER FAILURE-RESTARTING'’ IS TYPED OUT AND 
THE PROGRAM WILL a ee EXECUTION AT ‘‘START:** (THE 
VERY BEGINNING OF THE PROGRAM. IF THE SOFTWARE 

oy Bat IS BEING USED, ITS CONTENTS WILL BE 


PHYSICAL BUS ADDRESS CONSTRUCTION 


BELOW IS A SIMPLIFIED DIAGRAM OF HOW THE MEMORY 
MANAGEMENT LOGIC ent 4 ra been BUS ADDRESS 
USING THE VIRTUAL ADDRESS AND THE PAGE ADDRESS yh pe 
THE PAGE DESCRIPTOR REGISTER SELECTED WILL CONTAIN THE 
PAGE EXPANSION, LENGTH, AND ACCESS INFORMATION. 


12 11 10 09 08 07 06 05 04 03 02 01 00 
, 4% wt? 4 1 


(ADDED TO) 
15 14 13 12 11 10 09 08 07 06 05 04 03 02 01 00 


I 
I 
I 
I 
I 
I 
I 
I 
I 
V 


V 
21 20 19 18 17 16 15 14 13 12 11 10 09 08 07 06 05 04 03 02 01 00 


00 0 17000000 0 7 


= VBA BITS <15:13>_SELECT THE APPROPRIATE PAR AND PDR 
x= PSW MODE BITS <15:14> SELECTS THE USER (=11), SUPERVISOR 
(=01) OR KERNEL (=00) SET OF PAR'S/PDR'S 


PROGRAM DESCRIPTION 


SUBROUTINES USED BY THIS PROGRAM 


FOLLOWING IS A LIST OF THE SUBROUTINES AND HANDLERS USED 
THIS PR HAT ARE NOT PROVIDED BY THE ‘‘SYSMAC 
SUBROUT INES 


PROGRAM MAY BE F THE 
a RS a DOCUMENT AND PROGRAM LISTING FOR THE OTHER 


i. fe OFF T-BIT AND SAVE CURRENT PSW 

2. TURN ON T-BIT AND RESTORE Arathor PSW 

a sei ALL WRITEABLE BITS IN ALL PAR/PDR'S 

4. CONVERT VIRTUAL ADDRESS TO PHYSICAL ADDRESS 
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SEQ 0010 


NOTE ALSO THAT THE MACRO LIBRARY USED TO ASSEMBLE THIS PROGRAM 
HAS OTHER SPECIAL ROUTINES APPENDED TO THE SYSMAC MACRO PACKAGE; 
athe MUST BE USED TO ASSEMBLE EITHER PART A OR PART B 


PROGRAM LISTING 


A TABLE OF CONTENTS APPEARS AT THE BEGINNING OF THE LISTING 
WHICH CONTAINS THE NAMES OF EACH SECTION, SUBTEST, AND 
s+ Samad AND THE LINE NUMBERS CORRESPONDING TO THE START OF 


FOLLOWING THIS SECTION OF DOCUMENTATION IS THE ACTUAL 
PROGRAM LISTING COMPLETE WITH SUBTEST DESCRIPTIONS AND 
“CODING COMMENTS'’. 


USING THE PROGRAM TO DIAGNOSE A FAULT 


WHEN AN ERROR OCCURS, ONE OF THE THINGS THAT'S IMPORTANT 
TO NOTE IS WHAT PASS THE ERROR OCCURRED ON. IF THE PASS 
NUMBER IS ODD AND IS THREE OR GREATER, THE ERROR MIGHT BE 
T-BIT SENSITIVE. TRY RUNNING THE PROGRAM AGAIN WITH BIT 
12 OF THE SWITCH REG. EQUAL TO ‘l'’ TO INHIBIT T-BIT 
TRAPPING. THIS SHOULD HELP YOU DETERMINE WHAT MAKES THE 
MACHINE FAIL AND WHEN. 


IF YOU HAVE BEEN RUNNING WITH BIT 15 OF THE SWITCH 

T YOU ARE ABLE TO LOOK AT ALL 

LATED AULT YOU ARE 
A FAULT _IN AN EARLIER TEST MAY RESULT IN 

ERRORS DURING LATER Mah WHICH MAY GIVE YOU MORE 
CLUES ABOUT THE NATURE OF THE FAULT. NOW USE THE METHOD 
OUTLINED IN SECTION 3.2 FOR EACH ERROR TO GATHER AS 
MUCH INFORMATION AS POSSIBLE. 


NOW TO TEST YOUR IDEAS ON THE CAUSE OF THE FAILURE, 

YOU MAY WANT TO SCOPE THIS ERROR CONDITION. SET BIT 09 
OF = SWITCH REG. EQUAL TO ‘‘I"’ TO LOOP ON THE ERROR. 
FOR AN EVEN TIGHTER SCOPE LOOP THE ERROR CALL CAN BE 
REPLACED WITH A rege H (REFER TO COMMENTS BY ERROR CALLS 
IN THE PROGRAM LISTING). 


OR YOU COULD LOOP ON THE TEST BY EITHER He. BIT 14 

OF THE SWITCH REG. EQUAL TO ‘l"' OF BY SETTING BIT 08 OF THE 
SWITCH REG. EQUAL TO ‘‘l’' AND THEN SETTING THE TEST NUMBER 
IN BITS 07-00 OF THE SWITCH REG. YOU WILL PROBABLY WANT TO 
age M enon TYPEOUTS BY SETTING BIT 13 OF THE SWITCH REG. 
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522 
523 - TITLE oe rf 103" MEM MGMT PRT B 


i eDIGITAL EQUIPMENT CORP. 
S*MAYNARD, MASS. 01754 

°* 

*THIS PROGRAM WAS ASSEMBLED USING THE PDP=-11 MAINDEC SYSMAC 
| *PACKAGE (MAINDEC-11=DZQAC-C3), JAN 19, 1977. 


“BTL OPERATIONAL SWITCH SETTINGS 


ST 
INHIBIT ERROR TYPEOUTS 
INHIBIT TRACE TRAP 
BELL ON ERROR 
LOOP ON ERROR 

8 LOOP ON TEST IN SWR<7:0> 
SBTTL BASIC DEFINITIONS 


;*INITIAL ADDRESS OF THE STACK POINTER *** 1100 *** 
STACK= 1100 
ERROR=EMT 


SCOPE=I0T 
; *MISCELLANEOUS DEFINITIONS 
HT= 11 :;CODE FOR HORIZONTAL TAB 
::CODE FOR LINE FEED 
3:CODE FOR CARRIAGE RETURN 
3:CODE FOR CARRIAGE — FEED 
: PROCESSOR STATUS WOR 


:2STACK LIMIT REGISTER 

3 PROGRAM INTERRUPT REQUEST REGISTER 
DSwWR= 77570 ; s HARDWARE SWITCH REGISTER 
DDISP= 177570 HARDWARE DISPLAY REGISTER 
acer” fetal REGISTER DEF INITIONS 


s*nannennenenenene 


. SGeateaeeees 


33GE 
ae ZSTACK POINTER 
PC= %7 COUNTER 
z*PRIORITY LEVEL DEFINI TIONS 
PRO= 0 ;PR 


7;PRIORITY 
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BASIC DEFINITIONS 


100000 
04 
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3" "SWITCH REGISTER’ SWITCH DEFINITIONS 
SW15= 00000 


15 1 
SW14= 40000 
SWi3= 2 
SWwi2= 10000 
SW11= 4000 
Swi0= 2000 
swo9= 1000 
SwO8= 400 
Sswo7= 200 
SwO6= 100 
swoS= 40 
Ssw04= 20 
swo3= 10 
SwO2= 4 
swol= 2 
swoo= 1 
SW9=S 
SW8=SW08 
SwW7=Sw07 
SW6=S 
SwW5=SWO5 
SW4= 
SwW3=SWO3 
SW2=Sw02 
SwW1=Sw01 
SWO=S 
IT15= 1 
BIT14= 40000 
BIT13= 
BIT12= 10000 
BIT11= 4000 
BIT10= 2000 
BITO9= 1000 
1T08= 400 
BITO7= 200 
1T06= 100 
BITO5= 40 
BIT04= 20 
BITO3= 10 
BITO2= 4 
BITO1= 2 
BITOO= 1 
BIT9=81T09 
IT8=81T 
B1T7=81T07 
T6=81T 
B1T5=B1T05 
BIT4=81T04 
B1T3=81T03 
BIT2=81T02 
B1T1=81T01 
TO=81 
3 *BA 
ERRVEC= 4 
RESVEC= 10 


BI T00 
SIC *‘CPU'’ TRAP VECTOR as oy 
TIME OUT AND OTHER ERRORS 
: DRESERVED AND ILLEGAL INSTRUCTIONS 


SEQ 0012 
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BASIC DEFINITIONS SEQ 0013 


+e BIT 
RACE a 
‘BREAKPOINT RAP (BPT) 
:: INPUT OUTPUT TRAP (IOT) **SCOPE** 
; EMULATOR TRAP (EMT) **ERROR** 
alt on TRAP 
: TTY KEYBOARD VECTOR 
ze TTY PRINTER VECTOR 
PROGRAM INTERRUPT REQUEST VECTOR 
-SBTTL MEMORY MANAGEMENT DEF INITIONS 
3*KT11 a ADDRESS 


MMVEC= 250 
3*KT11 STATUS REGISTER ADDRESSES 
177572 SRO= 177572 


177676 177676 
UPERVISOR *'I'* PAGE DESCRIPTOR REGISTERS 
172200 STPDROS 172200 
172202 SIPDR1= 172202 
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MORY MANAGEMENT DEFINITIONS SEQ 0014 
172204 SIPDR2= 172204 
172206 SIPDR35= 172206 
172210 SIPDR4= 172210 
172212 SIPDRS= 172212 
172214 SIPDR6= 172214 
172216 SIPDR7= 172216 
; *SUPERVISOR ‘D’’ PAGE DESCRIPTOR REGISTERS 
172220 SDPDRO= 172220 
172222 SDPDR1= 172222 
172224 SDPDR2= 172224 
172226 SDPDR3= 172226 
172230 SDPDR4= 172230 
172232 SDPDR5= 172232 
1722 SDPDR6= 172234 
172236 SDPDR7= 172236 
; *SUPERVISOR *'I'' PAGE ADDRESS REGISTERS 
172240 SIPARO= 
172242 SIPARI= 172242 
172244 SIPAR2= 172244 
172246 SIPAR3S= 172246 
172250 SIPAR4= 172250 
172252 SIPARS= 172252 
172254 SIPAR6= 172254 
172256 PAR7= 172256 
ae” ISOR ‘D'* PAGE ADDRESS REGISTERS 
172260 = 172260 
172262 SDPARI= 172262 
172264 SDPAR2= 172264 
172266 SDPAR3= 172266 
172270 SDPAR4= 172270 
172272 SDPARS= 172272 
172274 SDPAR6= 172274 
172276 SDPAR7= 172276 
;*KERNEL ‘'I'*’ PAGE DESCRIPTOR REGISTERS 
172300 KIPDRO= 172300 
172302 KIPDR1= 172302 
172304 KIPDR2= 172304 
172306 KIPDR3= 172306 
172310 KIPDR4= 172310 
172312 KIPDR5= 172312 
172314 KIPDR6= 172314 
172316 KIPDR7= 172316 
ve. *'D'' PAGE DESCRIPTOR REGISTERS 
172320 KDPDRO= 172320 
172322 KDPDR1= 172322 
172324 KDPDR2= 172324 
172326 KDPDR3= 172326 
172330 KDPDR4= 172330 
172332 KDPDR5= 172332 
172334 KDPDR6= 172334 
172336 KDPDR7= 172336 
: *KERNEL "*I'' PAGE ADDRESS REGISTERS 
172340 KIPARO= 172340 
172342 KIPAR1= 172342 
172344 KIPAR2= 172344 
172346 KIPAR3= 172346 
172350 KIPAR4= 172350 
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MORY MANAGEMENT DEFINITIONS SEQ 0015 


7= 172376 
;*ADDITIONAL DEFINITIONS 
+t 


TBIT=B1T4 

WBIT=B1T6 
CPUERR=177766 
KERSTK=STACK 
SUPSTK=STACK-200 
USESTK=STACK-500 
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TRAP CAT 


575 


576 


577 


CHER 


000174 
000176 


000200 


000046 
000052 


000024 


020000 
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- SBTTL 3 CATCHER 


7 *ALL UNUSED LOCATIONS FROM 4 = 776 CONTAIN A *" ze HALT"’ 
:*SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS 
pee 9. CONTAINS 0 TO CATCH IMPROPERLY LOADED VECTORS 


DISPREG: “WORD 0 3sSOFTWARE DISPLAY REGISTER 


SWREG: 0 7zSOFTWARE SWITCH REGISTER 
.SBITL STARTING ADDRESS(ES) 
JMP @4START ;; JUMP TO STARTING ADDRESS OF PROGRAM 
.SBTTL ACT11 HOOKS 
DBASE ISIS ISI IOIDIOIDIIOIIOIDIIIIIOIDIOIDIOIDIDIDIDIOIDIOIDIUIOIUIDIIDIDIOIDIOIOIOIIIDI III IIE 
;HOOKS REQUIRED BY ACT11 
—" SAVE PC 


SENDAD 331)SET LOC.46 TO ADDRESS OF $ENDAD IN .$EOP 
WORD 0 ::2)SET LOC.52 TO ZERO 
=$SVPC 3: RESTORE P 
.SBTTL APT PARAMETER BLOCK 
ay PRR RSSASLALAAZSASASASL SSAA ASRS ASE A RARER RRR ARRAS ESR RAS ASRS SD DD 
>SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 
SLA RE ERE EEEEREREREEREEEKEEEEEREEKEEKEEEREEKEEREREKEEERER EEE 
.SX=.  ;;SAVE_CURRENT LOCATION 
524 7 3SET POWER FAIL TO POINT TO START OF PROGRAM 
200 ::FOR APT START UP 
244 | Z:POINT TO APT INDIRECT ADDRESS PNTR. 
SAPTHDR ;:POINT TO APT HEADER BLOCK 
-=.$X  ;;RESET LOCATION COUNTER 
LRA KEE H 
“SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 
INTERFACE SPEC. 


$HIBTS: .WORD 0 3;TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 

SMBADR: .WORD S$MAIL ate Tih OF APT MAILBOX (BITS 0-15) 

$TSTM: .WORD 2 ; a TIM OF LONGEST TEST 

$SPASTM: .WORD 5 7;RUN TIME IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 


SEQ 0016 


SUNITM: .WORD 5 ADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 


- WORD SETEND-SMAIL/2 3 ¢LENGTH MAILBOX~E TABLE (WORDS) 


E 
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COMMON TAGS SEQ 0017 


578 - SBTTL COMMON TAGS 
PTT TTT TCT ttt ite titi iii iii iii tii iii iiiiiiiiiii iii is) 
:*THIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 
:*USED IN ae OGRAM. 


:=START OF COMMON TAGS 


: CONTAINS THE bY NUMBER 
ERROR FLAG 
SUBTEST. ITERATION COUNT 
SCOPE LOOP ADDRESS 
SCOPE RETURN FOR ERRORS 
TOTAL ERRORS DETECTED 
ITEM CONTROL BYTE 
MAX. ERRORS PER TEST 
PC OF LAST ERROR + + leat 
ADDRESS OF ‘GOOD' 
ADDRESS OF ‘BAD’ DATA. 
"GOOD" DATA 


:; CONTAINS DATA 
3 zRESERVED--NOT TO BE USED 


; AUTOMATIC MODE INDICATOR 
3; INTERRUPT MODE INDICATOR 


sO DRESS OF SWITCH REGISTER 
ey nae ra “teal REGISTER 


:TTY KBD BUFFER 
TITTY PRINTER STATUS REG. ADDRESS 
eeTTy PRINTER BUFFER REG. ADDRESS 


sssssssssssss 


8 
_ 
XRVSRARNVORFAVOS 


8 
_ 
leleleleleleleleleleon leilelelelelelole) 


§ 


ee 


Nm 


SHINSERT FILL CHARS. AFTE 

"TERMINAL AVAILABLE’ FLAG (BIT<07>=0=YES) 
;;CONTAINS THE ADDRESS FROM 
z:WHICH ($REGO) WAS OBTAINED 


ee ; CONTAINS ( ($REGAD) +0) 
(($REGAD) +2) 
( (SREGAD) +4) 


Oo 

~ 
an) 
a 


oe : CONTAINS ( (SREGAD) +12) 
7;USER DEFINED 


RRVSA RNSKF 


MMVNy 
COOCOCOCO CBDOOCCOCOF CO—-NO 


I 2 3 ss 3 9 4 4 


SS8S888s S8Ssss 


NED 
: ESCAPE ON ERROR ADDRESS 
<207><377><377> =I CODE FOR BELL 


—— 
NO 


ad QUESTION MARK 
<15> : {CARRIAGE RE TURN 
<12> 3eLINE FEED 





C 


, @ 
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OMMON TAGS 


FL AAAARARRAEEAAARAERERERAAE REE ERHRREARARRERERERRARRERERRAR HD 


-SBTTL APT MAILBOX-E TABLE 


Ff AAAAAAARAEAEAARARRARARARAERERARARARARARRAEARAERRARRARRARARARRAHERARAEREEE 


T MAILBOX 
:IMESSACE TYPE CODE 
ATAL E NUMBER 


7 3APT ENV foot tre TABLE 
: 7 ENVIRONMENT BYTE 
: ENVIRONMENT MODE BITS 
; SAPT SWITCH REGISTER 
sUSER_ SWITCHES 
;CPU TYPE, oon Tee 


bits ae Fy CPU T 
BA «we 4f “11/0502, ve =03,11/40=04,11/45=05 


CLOCK 
9=FLOATING POINT PROCESSOR 
BIT 8=MEMORY MANAGEMENT 


;HOLDS TEST NUMBER FOR TYPEOUTS 
;USED TO STORE THE STACK POINTER AFTER A TRAP 
;USED TO STORE THE PC OF A TRAP OR ABORT 

THE PS OF A TRAP OR ABORT 


CONTENTS OF SR2 
: CONTENTS OF SR3 
SAVES THE PSW THAT MAY HAVE ITS T-B8IT ON 
;HOLDS VIRTUAL ADDRESS 
HOLDS BITS <15: 
sHOLDS BITS <21:16> OF PHYSICAL ADDRESS 
HOLDS Bs FROM ABORT OR TRAP 
00 sHOLD NUMBER OF LOOP ITERATIONS 
:°T" ait STATE INDICATOR 


$TBIT: .WORD 
1o2 015 $CNTLC: . *C/<15><12> CONTROL C 


SEQ 0018 








Ge 
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ERROR POINTER TABLE SEQ 0019 


-SBTTL ERROR POINTER TABLE 

7*THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR. 

>*THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN 

:*LOCATION SITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE Ha, - PERTINENT. 
:*NOTE1: IF SITEMB IS 0 THE ONLY PERTINENT DATA IS (SERRP 


:*NOTE2: EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EAPLAINED AS FOLLOWS: 
is EM 7z:POINTS TO THE ERROR MESSAGE 
3* DH :z;POINTS TO THE DATA HEADER 
s* OT ;ZPOINTS TO THE DATA 
-* DF ::POINTS TO THE DATA FORMAT 
001320 $ERRTB: 
580 ;*ITEM 1 : 
581 001320 042264 EM1 ae OL ™~ TRAP TO LOC. 004 
582 001322 045026 DH1 OLD PC OLD PSW R6 WAS CPUERR TESTNO ERRORPC 
583 001324 047336 DT1 RAPE. TRAPPS , WASR6, CPUERR, TESTNO, SERPPC ,0 
one 001326 050051 DF12 :0, 0, 0.0.0. 0 
586 s*I1TEM 2 
587 001330 042324 EM2 ;UNEXPECTED MEM. MGMT. TRAP TO LOC. 250 
588 001332 045106 DH2 #OL D PC OLD PSW R6 WAS’ SRO SR2 TESTNO ERRORPC 
589 001334 047354 DT2 ; TRAPPC, TRAPPS, WASR6, WASSRO, WASSR2, TESTNO, SERRPC, 0 
ra 001336 050033 DF2 :0,0,0,0,0,0,0 
592 s*1TEM 3 
593 001340 042373 EM10 :MEMORY MGMT. ACCESS ABORT DID NOT OCCUR 
594 001342 045176 DH10 sPDR 4 PSW TESTNO ERRORPC 
595 001344 047374 DT10 7 SREG2,$TMPO, TESTNO, SERRPC ,0 
re 001346 050042 DF3 70,0,0.0 
598 zs ITEM 4G 
599 001350 042443 11 oh ad ERROR DID NOT ABORT INSTRUCTION 
001352 045176 DH10 RG PSW TESTNO ERRORPC 
601 001354 047374 DT10 ‘SREGS. $STMPO, TESTNO, SERRPC ,0 
602 001356 050042 DF3 :0,0,0, 
603 
604 *ITEM 5 
605 001360 042512 12 ;SRO DID NOT REPORT ACCESS ERROR CORRECTLY 
606 001362 045236 DH12 = SRO WAS EXPECTD PDR 4 PSW TESTNO ERRORPC 
607 001364 047406 DT12 *WASSRO, S$REG3,$REG2,$TMPO, TESTNO, SERRPC .0 
608 001366 050051 DF12 3:0,0,0,0.0, 
609 
610 :*1TEM 6 
611 001370 5 13 ;SR2 DID NOT LOCKUP CORRECT VIRTUAL ADDR. 
612 001372 045316 DH13 :SR2 WAS EXPECTD PDR 4 PSW TESTNO ERRORPC 
613 001374 047424 D113 sWASSR2, SREG4,SREG2,$TMPO, TESTNC, SERRPC .0 
er 001376 050051 DF12 :0,0,0,0,0, 
616 s*1TTEM 7 
617 001400 042635 EM14 ;PAGE LGTH. ABORT OCCURRED WHEN IT SHOULDN'T HAVE 
618 001402 045376 DH14 :V.B.A. KIPDR4 SRO WAS SR2 WAS TESTNO ERRORPC 
619 001404 047442 D114 7 SREGO, SREG4 ,WASSRO,WASSR2, TESTNO, SERRPC ,0 
os 001406 050051 DF12 :0,0.0,0,0.0 
622 :*ITEM 10 
623 001410 042716 EM15 ;PAGE LGTH. ABORT DID NOT OCCUR WHEN IT SHOULD HAVE 


624 001412 045456 DH15 7V.B.A. KIPDR4 TESTNO ERRORPC 


H 
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ERROR POINTER TABLE SEQ 0020 


625 001414 ;SREGO,$REG4, TESTNO, SERRPC ,0 


NOT REPORT PAGE LGTH. ABORT CORRECTLY 
IPDR4 SRO WAS EXPECTD TESTNO ERRORPC 
Ww etoneterbaseine, cy apightentth 


ID NOT LOCKUP CORRECT VIRUAL ADDR 
. KIPDR4 SR2 WAS EXPECTD TESTNO ERRORPC 
ewe -WASSR2 , $REG3, TESTNO, SERRPC ,0 


:SR2 DID NOT LOCKUP CORRECT VIRUAL ADDR. 
;SR2 WAS EXPECTD TESTNO ERRORPC 
;WASSR2 , $REG1, TESTNO, SERRPC ,0 


. 
. oe . . 


JS it SR2 CHANGED BY A SECOND ABORT 
FIRST ABORT SECOND ABORT 

649 SRO WAS SR2 WAS SRO WAS SR2 WAS TESTNO ERRORPC 

650 001454 :STMPO , $TMP2,, WASSRO,WASSR2, TESTNO, SERRPC . 0 

$2) 001456 :0,0,0.0,0,0 


653 : 

654 001460 SRO OR SR2 WAS NOT ‘RESET’ BY A RESET 

655 001462 7SRO WAS SR2 WAS TESTNO ERRORPC 
;WASSRO ,WASSR2, TESTNO, SERRPC ,0 


. 
e e e e 


3;SR2 NOT TRACKING CORRECTLY 
;SR2 WAS EXPECTD TESTNO ERROPC 
7 WASSR2 ,SREG1, TESTNO, SERRPC ,0 


. 
° o e e 


DID NOT og em KERNEL SPACE 
PSW WAS R TESTNO ERRORPC 
:SREGI, SREG2eT TESTNO. SERRPC ,0 


:kT ERROR SERVICED ON ODD ADDR. ERROR 
PDR TEST ERRORPC 
$REGS, TESTNO, SERRPC ,0 


e e o 


SRO OR SR2 CHANGED BY ODD ADDR. ERROR 
679 001522 EXPECTED athe 
R SR2 WAS TESTNO ERRORPC 


680 S SRO WA 
681 001524 ;$REGO,$REG1 ,WASSRO, WAssr>. TESTNO, SERRPC ,0 








I 2 
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ERROR POINTER TABLE SEQ 0021 
682 001526 050051 DF 12 30,0,0,0,0,0 
684 ss ITEM 22 = 
685 001530 043400 EM27 ZERROR DURING ‘DOUBLE ERROR’' (KT & ODD ADDR.) 
686 001532 046245 DH27 TEXPECTED: 
687 = PSW PC SRO SR2 
688 i 120017 (3$+4) 020147 (3$) 
689 ;RECE IVED 
690 PSW SRO SR2 TESTNO ERRORPC 
691 001534 047620 D127 :$REG1, SREG3. WASSRO. WASSR2> TESTNO, SERRPC 0 
692 001536 050051 DF12 :0,0,0.0,0,0 
694 se ITEM 23 
695 001540 043455 EM30 MFP] INSTRUCTION PUSHED WRONG DATA 
696 001542 046442 DH30 “DATA _—CODAT 
697 : EXPECTD RECEIVD TESTNO ERRORPC 
698 001544 047636 DT30 *$REGO, $REG1, TESTNO, SERRPC , 0 
699 001546 050042 DF3 70,0,0,0 
701 s* ITEM 26 
702 001550 043520 EM31 MTP I INSTRUCTION LOADED WRONG DATA 
703 001552 046442 D#H30 DAT 
704 :EXPECTD RECEIVD TESTNO ERRORPC 
705 001554 047636 DT30 $REGO, $REG1, TESTNO, SERRPC ,0 
06 001556 050042 DF3 :0°00.0 
708 s*1TEM 25 
709 001560 043563 EM32 ;STACK NOT PUSHED BY MFPI-MTPI 
710 001562 046517 DH32 :TESTNO ERRORPC 
711 001564 047650 DT32  TESTNO, SERRPC ,0 
ae: 001566 050057 DF 32 70.0 
714 s*ITEM 26 
715 001570 043621 EM33 :KERNEL PAGE ACCESSED INSTEAD OF USER: MFPI-MTPI 
716 001572 046537 DH33 tSRO WAS SR2 WAS TESTNO ERRORPC 
717 001574 047556 DT22 SWASSRO,WASSR2, TESTNO, SERRPC ,0 
718 001576 050042 DF3 :0,0,0,0 
720 :*] TEM 27 
721 001600 043677 EM34 ABORT IN KERNAL D-SPACE HAD WRONG CONDITION 
722 001602 046577 DH34 sAROD (MAR1) (MMR2) TESTNO ERRORPC EXPECTING 020031 
723 001604 047656 DT34 *$REG1, $REG2, $REG3, TESTNO, SERRPC.0 
re 001606 050026 DF1 :0,0,0.0,0 
726 :*1 TEM 30 
727 001610 043760 EM35 : ILLEGAL MODE 10 NOT ABORTED 
728 001612 046517 DH32 :TESTNO ERRORPC 
729 001614 047650 DT32 + TESTNO, SERRPC ,0 
730 001616 050057 DF 32 0,0 
732 >] TEM 31 
733 001620 044014 EM36 :SRO DID NOT REPORT ILLEGAL MODE 10 CORRECTLY 
734 001622 046670 DH36 *SRO WAS EXPECTD TESTNO ERRORPC 
735 001624 047672 DT36 *WASSRO, $REG1, TESTNO, SERRPC ,0 
736 001626 050042 DF3 0,0,0,0 
738 ss ITEM 32 
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ERROR POINTER TABLE 


001630 


MACRO M1111 


3* ITEM 34 
EM41 


DH41 


DT41 
DF1 


ITEM 35 
EM42 


7*1TEM 37 
EM44 


DH30 


DT30 
DF3 


7* ITEM 40 
EM43 


7* ITEM 43 
EM47 


J 
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SEQ 0022 


:PSwW CHANGED BY A RTI _IN USER MODE 
[PSW WAS EXPECTD TESTNO ERRORPC 
;SREG1, SREG2, TESTNO, SERRPC ,0 


;ABORT IN _KERNAL D-SPACE PICKED UP VECTOR FROM I-SPACE 
3(PSW) __TESTNO ERRORPC EXPECTING XXx340 
$REGO, TESTNO, SERRPC ,0 


. 
” e ° 


3D SPACE ENABLE CIRCUITRY HAS FAILED 

sERROR  AUTOI/D VIRTUAL 

SREGISTR REGISTR ADDRESS TESTNO PC AT ABORT 
:WASSRO,WASSRI , -WASSR2, TESTNO,BADPC ,0 


: INCORRECT STORE BY MTP INSTRUCTION 
SGDDATA STORED TESTNO ERRORPC 
;$REGS, SREG4 , TESTNO, SERRPC ,0 


TRIED TO REFERENCE NON-RESIDENT PAGE 
;(MMRO) (MARI) (MARZ) TESTNO ERRORPC 
;$REGO,$REG1, $REG2, TESTNO, SERRPC ,0 


WRONG DATA ahaa BY MFP INSTRUCTION 


DATA DATA 
sEXPECTD RECEIVD TESTNO ERRORPC 
GO, $REG1, TESTNO, SERRPC .0 


0, eVe 


: TRIED TO ait th NON-RESIDENT PAGE 
7(MMRO) (MART) (MMR2) TESTNO ERRORPC 
; WASSRO,WASSR1 WASSRO. TESTNO, SERRPC ,0 


70,0,0,0,0 


7 ILLEGAL CSM Je NOT TRAP TO 10 
STESTNO _ERRORPC 
 TESTNO, SERRPC ,0 


. 
e a 


7CSM DID NOT ENTER SUPERVISOR MODE 
3(PSW) __TESTNO ERRORPC 
WASR6, TESTNO, SERRPC ,0 


. 
e e e 


CSM SET UP WRONG PREVIOUS MODE 











K 
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ERROR POINTER TABLE SEQ 0023 


796 001742 3(PSW) __TESTNO ERRORPC 
;WASR6, TESTNO, SERRPC ,0 


. 
° o om 


7 * ITEM 44 
EMSO 7CSM SET A — WRONG 


DH30 DATA 

SEXPECTD RECEIVD TESTNO ERRORPC 
DT30 7$REGO,$REG1 , TESTNO, SERRPC ,0 
DF3 :0,0,0.0 


3* ITEM 45 
EM51 ‘ear heme INCORRECT ARGUMENT 


DH30 

;EXPECTD RECEIVD TESTNO ERRORPC 
DT47 SREGS ,WASR6, TESTNO, SERRPC ,0 
DF3 :0-0-0.0 


s*I1TEM 46 
EMS2 7CSM PUSHED WRONG PC 
DH30 sDATA DATA 
ZEXPECTD RECEIVD TESTNO ERRORPC 
DT50 :$TMPO, WASR6, TESTNO, SERRPC ,0 
DF3 :0,0,0.0 


7*1TEM 47 
EM53 


CSM DID NOT CLEAR OLD PSW BITS <3:0> 
;OLDPSW_ TESTNO ERRORPC 
[WASR6, TESTNO, SERRPC ,0 


2 CSM ACCESSED WRONG SUPERVISOR SPACE 
;TESTNO ERRORPC 
 TESTNO, SERRPC ,0 

831 002016 30,0 





L 
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weeee = =SUBROUTINES UNIQUE TO THIS PROGRAM aenne SEQ 0024 


-SBTTL ***** SUBROUTINES UNIQUE TO THIS PROGRAM 
. SBTTL INITIALIZE ALL PAR'S AND PDR'S 


3 FARRAR ERERERERRERERREEREAAEREEERREAEERRERE EERE 
* 


i* THIS ROUTINE WILL INITIALIZE ALL KERNAL, SUPERVISOR, AND 
s° USER PAR'S AND PDR'S TO THEIR USUAL INITIAL VALUE 
ie 


eee T titi i iti titi iti titi iti iitiiititiiiiiiiitiitiiiiiiiii iii iis, 
APRINIT: 
012700 077406 MOV #77406,RO 3MAKE ALL PDR'S 4K, READ/WRITE, UPWARDS 
ZEXPANDING, 200 BLOCKS 
012702 172300 #KIPDRO,R2 3LOAD THE ADDRESS OF THE FIRST KERNAL PDR 
000020 1$: e TH 16 
2$: RO, (R2)+ 


R1,2$ 
172340 R2.AKDPDR7+2 PDR'S 
‘BRANCH IF KERNAL & SUPER HAVE BEEN LOADED 
172200 #SIPDRO,R2 [LOAD ALL SUPERVISOR PDR'S 
BR SBRANCH TO LOOP 
172240 : R2,MSDPDR7+2 SHAVE USER PDR'S BEEN DONE 
BNE 4$ ‘BRANCH IF THEY HAVE 
177600 MUIPDRO,R2 [LOAD ALL USER POR’S 
1$ ‘BRANCH TO LOOP 
172340 : #KIPARO,R1 LOAD R1 WITH ADDRESS OF KIPARO 
172360 #KDPARO.R2 OAD R2 WITH ADDRESS OF KDPARO 
000007 : MOV #7 ,R3 Aut LOOP COUNTER WITH 7 
RO *CLEAR PAR VALUE REGISTER 
RO, (R1)+ LOAD AN I-SPACE PAR 
RO (Re) + [LOAD A D=SPACE PAR 
000200 we 260,RO INCREASE THE PAR V 
[LOOP UNTIL 7 ARE 
177600 #459600, (R1) [MAP I-SPACE PAR7 TO I/ 
177600 #177600. (R2)  :MAP D=SPACE PAR7 TO I/ 
172356 R! AK IPAR7 


172240 #SIPARO,R1 
172260 ~ #SDPARO ,R2 


5$ 
172256 ¢ ps -#SIPAR7 


54 
56 
58 
860 
862 002 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


O PAGE 


._"ANCH TO USER LOAD ROUTINE 
zREtunN TO CALLING ROUTINE 


Sitters 


PC 
177640 : MUIPARO,R1 
177660 MHUDPARO ,R2 
BR 5$ 


74 
04 
10 
12 
16 
20 
5 
34 
% 
42 
46 
50 
ok 
56 
60 
64 
70 


he 
RBS 
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918 002306 
919 002314 
920 


177070 
177040 


177012 


177376 


M 
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170316 


177032 
177026 
177022 


175302 
177704 


170202 


eee D-SPACE TESTS MEMORY MANAGEMENT ABORT SERVICE ROUTINE 
[RRA ERARRREERERERRARRARAERERAARAARERAERAARAARARERAARERE EERE 
THIS vy tye WILL BE ENTERED IF A MEMORY 
DURING Ti SPACE ENABL 


MAPPED NON-RE 
HER PAGES ARE MAPPED RESIDENT, 4K, READ/WRITE. 
THE NON-RESIDENT PAGE IS 1 OR 3 YOU ARE FOR 
YOU SHOULD. IF THE NON-RESIDENT PAGE IS 3, AND 
Steath ARE PROBABLY FORCING I-SPACE WHEN YOU SHOULD BE ALLOWING 
Wertiititiititiiitifiiiitiiiiiiiiiiiiiiii ii iit 
NODSPAC: zSTARTING ADDRESS FOR ABORT SERVICE ROUTINE 
BIC 3 TURN OFF D=-SPACE BEFORE DOING ROUTINE 
~~ FLAG ZERO ba THE FIRST TIME 


G SHOULD BE 
‘BRANCH IF FIRST TIME IN ROUTINE 
HA D THIS 


*-e*# 2 eS EH BP 


Be Se Fe Se Be Be Be Be Be Be Be & 


I 
NDF LAG: a 


K, T 
RST ERROR CONDITION IS PROBABLY STILL 
‘Loe KED UP. 
:SAVE PC_AT TIME OF ABORT OR TRAP 
7SAVE RETURN ADDRESS IN CASE OF LOOP 
7SAVE OLD PSwW IN CASE OF LOOP 
ZSAVE STATUS REGISTER 
ZSAVE AUTO INCR/DECR REGISTER 
SAVE VIRTUAL ADDRESS ae 
;WAS ABORT 


NON-RESIDENT 
sBRANCH IF ABORT NOT “EXPECTED 
3D-SPACE TOEXIT FAUL 


S BRANCH 

7UNEXPECTED M.M. ABORT 

7CLEAR ALL alis’ EXCEPT 0 AND 8 
MOVE 1 FLAG 


T2,.MAR3S 
RETURN TO MAIN PROGRAM 


SEQ 0025 





N 
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TURN OFF T=BIT AND SAVE CURRENT PSW 


. SBTTL TURN OFF T=BIT AND SAVE CURRENT PSW 


J RRAAAAAAAAAAAEREREEAEAEREERRRRAAREREEERAERREEERRREEERRERERERKERH 


THIS SUBROUTINE IS USED TO TURN OFF THE TRACE TRAP BIT IN 
THE PSW IF IT IS ON. THE PROCESSOR STATUS IS SAVED IN 
""TBITPS'* SO THAT THE PSW CAN BE RESTORED TO ITS PREVIOUS 
CONDITION WHEN CONDITIONS WARRANT T-BIT TRAPPING. 


SEERA AAAAAAAAAAEAERAAEAERAAAERAKAAAEARAEARERAAEARRRAEEREEEEKKKKEKKH 


175454 000020 : T < -ATBIT 3I$ ag Ae SET IN THE PSW? 


TEXIT 
175444 PSW,-(SP) ZPUSH PRESENT PSW ON THE STACK 
176736 (SPS , TBITPS ¢ALSO SAVE IT IN 'TBITPS'* FOR 
ZRESTORING LATER 
000020 #TBIT, (SP) iCLEAR THE T-BIT (BIT 4) IN THE PSW 
002350 #1$,-(SP) ZPUSH PC OF ‘RTS'’ ON STACK 
¢ RETURN a 1$ WITH T-BIT OFF 
1$: PC SRETURN TO PROGRAM 


-SBTTL TURN ON T-BIT AND RESTORE PREVIOUS PSW 


JU AAA ARERAERERAREAEEKEARRERRARERAEAEEARARAEREAREEERERRE HH 


THIS SUBROUTINE IS USED TO RESTORE THE ae oe STATUS 
TO ITS PREVIOUS CONDITION BY RESTORING THE °'T-BIT PSw'' 
SAVED BY THE ‘‘TOFF'’ SUBROUTINE IN THE ‘'TBITPS'* LOCATION. 


Pettitt it iti iii iit iiiiliiiiiiiiiiiiitii 
176716 000020 TON: TBITPS ,ATBIT eo IN THE PREVIOUS PSW? 


1$ 
176706 TBITPS,~(SP) [PUSH PREV VIOUS PSW ON THE STACK 
000340 176700 #340, TBITPS RESET THE “"TBITPS** LOCATION 
002402 #1$,-(SP) PUSH PC OF ‘RTS'* ON STACK 
j RETURN * at 1$ WITH T-BIT RESTORED 
PC [RETURN TO PROGRAM 


SEQ 0026 
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wrens RAP HANDLING ROUTINES ****# SEQ 0027 


-SBTTL *eeee TRAP HANDLING ROUTINES ‘*#*#* 
» SBTTL CPU TRAP HANDLER ROUTINE 


—MARAARARASAAALALALALLLALEAE LEAL ALE ALARA SAAR RAR R ERA RA ESRD SD DD 


THIS SUBROUTINE WILL HANDLE ALL CPU TRAPS AND ABORTS THRU 
"ERRVEC'’ (LOC. 004). IF THIS SUBROUTINE IS ENTERED BY A 
care” BEFORE THE FIRST HAS BEEN SERVICED, A HALT IS 


ee 
TIMERR: INC (PC)+ sMAKE FLAG zane IF FIRST TIME T 
TIMFLG: = ra SNEGATIVE ONE FOR ‘HAVE ‘ENTERED F FLAG 


Be te Be Be 


*- +22 2 BP Bee 


ee ee 


(KSP) +, TRAPPC 
(KSP) +, TRAPPS 
a 
, 
177777 =177746 #-1,TIMFLG 
175322 CPUERR ; 
TRAPPS,-(KSP)  ;PUT PC & PS OF TRAP ON STACK 


TRAPPC , = (KSP) 
;RETURN FROM INTERRUPT OR ABORT 


-SBTTL MEMORY MANAGEMENT TRAP HANDLER ROUTINE 


RRR RRR ERE REE ERE REE RERREEEREE EEE REE E EE 


THIS SUBROUTINE WILL HANDLE ALL UNEXPECTED MEMORY MANAGEMENT 

TRAPS AND ABORTS THRU 'MMVEC'' (LOC. 250). IF THIS SUBROUTINE IS 
ENTERED BY A SECOND TRAP BEFORE THE FIRST HAS BEEN SERVICED, A 
HALT IS EXECUTED. 


ETI tit ittittitt ttt ti ttt itiiiiiiiiiiitiitiiitiiiiiiiiiiititiiis) 
MGMERR: INC (PC)+ sMAKE FLAG ZERO IF FIRST TIME THRU 
MGMFLG: .WORD -1 SNEGATIVE ONE A "HAVE ENTERED’’ FLAG 
BEQ 1$ SBRANCH IF FIRST T IN 

STOP! - I° mM ENTERED THIS ROUTINE 

ZA SECOND TIME ra I FINISHED 

;REPORTING THE FIRST ERROR. THE 

; SECOND ENTRY ADDRESS SHOULD BE ON 

H RNEL STACK 


(KSP) +, TRAPPC 
(KSP)+, + gta 


SESRSRERSSSs 


S AT 
SAVE STACK POINTER VALUE 
176554 7SAVE CONTENTS OF KT STATUS REG. 0 
176552 MOV SAVE CONTENTS OF KT STATUS REG. 2 
175046 I ;CLEAR ERROR BITS IN STATUS REG 0 
2 [UNEXPECTED TRAP OR ABORT TO LOC. 250 
177724 [MAKE FLAG NEGATIVE ONE FOR NEXT TIME 


[PUT PC & PS OF TRAP ON STACK 


— od ot od oes od ss SS Ss Ss Ss SS SS 


lelelelelejlelo) 
ah ah oh aD a ed od 
QAUSWN-O 


016746 TRAPPC , = (KSP) 





C 
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MEMORY MANAGEMENT TRAP HANDLER ROUTINE SEQ 0028 


A 4 002544 000006 RTT ;RETURN FROM INTERRUPT OR ABORT. 





CKKTBAO 11/44 MEM MGMT 
eeeee = =STARTING POINT 


02 
020214 


020222 


020250 
020256 
020260 
020262 
020266 
020270 
020276 
020304 
020310 
020314 


020000 


112767 


012737 


00 
012767 
012767 


013746 


005067 
132767 


PRT B 
OF TEST 


036122 
000340 


000002 
020170 
020160 
000006 
000010 
000012 
161102 
020206 
020214 


177777 


020270 


000176 
000174 


000004 
160716 
000200 


D 
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Ree 


6 
015570 
160775 


000014 
000016 
015760 
000010 
015734 


000010 


160642 
160636 


160723 


-SBTTL ***** STARTING POINT OF TEST ***** 
este: xeaee STARTING ADDRESS OF 200 ***** 


START: 
-SBTTL INITIALIZE THE COMMON TAGS 
7: CLEAR hind COMMON TAGS (S$CMTAG) AREA 


MSCMTAG ,R6 7sFIRST LOCATION TO BE CLEARED 
CLR (R6)+ 73CLEAR MEMORY LOCATION 
CMP AMSWR,R6 ; ; DONE? 
ated --6 , ;;LOOP BACK IF NO 

#STACK, SP :-SETUP THE STACK POINTER 


: INITIALIZE A FEW VECTORS 

#SSCOPE , a@#IOTVEC asiet VECTOR FOR SCOPE ROUTINE 
MOV #340, a#1OTVEC+2 ; :LEVEL 
MOV #SERROR , AFEMTVEC EMT VECTOR FOR ERROR ROUTINE 
MOV #340, QvEMTVEC*+2 sel VEL 7 
MOV WSTRAP ,@ATRAPVEC :; FRAP VECTOR FOR TRAP CALLS 
MOV #340, a TRAPVEC +2: LEVEL 7 
MOV WSPWRDN, @APWRVEC ; ;POWER_FAILURE VECTOR 


MOV #340, aWPWRVEC+2 ;:LEVEL 7 
MOV SENDCT,SEOPCT  ;;SETUP END-OF-PROGRAM COUNTER 
ie $ESCAPE eeCk LEAR THE ESCAPE ON ERROR ADDRESS 


#1 , SERMAX ALLOW ONE ERROR PER TEST 
SINITIALTZE THE ‘T=BIT'’ TRAP VECTOR. a LOAD LOCATION *‘SRTRN’’, IN 
3; THE "END-OF-PASS'' (SEOP) ROUTINE, WITH A ‘RTI*' OR 'RIT"' 
MOV #SRTRN, @ATBITVEC CriSET "'T'' BIT VECTOR TO $RTRN 
MOV $300.0 BATBITVECSS eg LEVE L 7 


MOV A#RTI,$SRTRN 72SET T SRTRN gt - Yi 

MOV #65$, AARESVEC :TRY TO DO AR 

CLR -(SP) DUMMY PS 

MOV #64$ ,-(SP) 2 AND PC 

RTT TRY THE RTT 
64$: ~y a, ZiRTT IS LEGAL--SET $RTRN TO A RTT 
65$: ADD #10,SP T ILLEGAL--CLEAN OFF -THE STACK 
66$: MOV #RESVEC+2, amesvit™ : RESTORE TRAP CATCHER 

CLR $TBIT CLEAR ‘'T'' BIT SWITCH 

MOV oes :PINITIALIZE THE LOOP ADDRESS FOR SCOPE 

ERROR LOOP ADDRESS 


MOV -SLPERR UP THE 
::SIZE FOR A HARDUARE SWITCH REGISTER. IF NOT FOUND OR IT IS 
;;EQUAL TO A *-1'', SETUP FOR A SOFTWARE SWITCH REGISTER. 

MOV @#ERRVEC ,- (SP) 27 SAVE ERROR VECTOR 


MOV #67$,@MERRVEC ;;SET UP ERROR VECTOR 

MOV ADSWR , SWR S:SETUP FOR A HARDWARE SWICH REGISTER 
MOV #DDISP,DISPLAY STAND A A_ HARDWARE DISPLAY REGISTER 

CMP #~-1,aSWR ee TRY TO REFERENCE HARDWARE SwWR 

BNE 69$ :BRANCH IF NO Mn i TRAP OCCURRED 

3 SAND THE HARDWARE SWR IS NOT = -1 
BR 68$ 3 BRANCH IF NO TIMEOUT 
67$: ay #68$, (SP) 77SET UP FOR TRAP RETURN 


68$: MOV AMSWREG, SWR jaan TO SOFTWARE SwWR 
MOV #DISPREG,DISPLAY 
69$: MOV (SP) +, @#ERRVEC ting}! ERROR VECTOR 
AR PASS COUNT 


C $PASS LE 
BITB MAPTSIZE ,SENVM Test USER SIZE UNDER APT 


SEQ 0029 


E 
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INITIALIZE THE COMMON TAGS SEQ 0030 
020322 001403 BEQ 70$ ;YES,USE NON-APT SWITCH 
oc03s3 012767 001246 160606 70$ MOV #SSWREG, SWR ; NO, USE APT SWITCH REGISTER 
1025 -SBTTL TYPE PROGRAM NAME 
>: TYPE THE NAME OF THE PROGRAM IF FIRST PASS 
020332 005227 177777 INC #-1 szFIRST TIME? 
020336 001047 BNE i $ 7 BRANCH IF NO 
020340 022737 036056 000042 CMP gee. avs2 ¢sACT~11? 
020346 001443 ro 71$ 38 CH IF YES 
020350 104401 020416 TYPE 72$ YPE ASCIZ STRING 
-SBTTL GET VALUE FOR SOF TWARE shiver REGISTER 
020354 005737 000042 TST as2 7ZARE WE RUNNING UNDER XXDP/ACT? 
020360 001012 BNE 8 7 BRANCH IF YES 
362 126727 160656 000001 CMPB SENV,41 7 7ARE WE RUNNING UNDER APT? 
020370 001406 BEQ 73$ 7 BRANCH IF YES 
020372 026727 160542 000176 CMP SWR ,ASWREG 72 SOFTWARE SWITCH REG SELECTED? 
020400 001005 BNE 74$ 32 CH IF NO 
020402 104407 GTSWR 3iGET SOFT-SWR SETTINGS 
020404 000403 BR 74$ 
OSoete 112767 000001 160520 ize" MOVB #1,$AUTOB 72SET AUTO-MODE INDICATOR 
020414 000420 BR 71$ GET OVER THE ASCIZ 
-72$: .ASCIZ <CRLF>ACKKTBAO 11744 MEM MGMT PRT BAK<CRLF> 
020456 o1$: 
1026 
1027 020456 LOOP: 
1028 020456 012706 001100 MOV #STACK ,KSP s INITIALIZE THE toe POINTER 
1029 020462 012767 040000 157306 MOV #40000 ,PSwW ; TURN ON SUPERVISOR MODE 
1030 020470 012706 000700 MOV #SUPSTK,SSP ; INITIALIZE SUPER. STACK POINTER 
1031 020474 012767 140000 157274 MOV #14 -PSW ; TURN ON USER MODE 
1032 020502 012706 000600 MOV MUSESTK,USP S INITIALIZE USER STACK POINTER 
1033 020506 005067 157264 CLR PSW RETURN TO KERNAL MODE 
1034 020512 012767 002404 157264 MOV #TIMERR,ERRVEC ;LOAD CPU SERVICE ROUTINE INTO TRAP VECTOR 
1035 020520 012767 000340 157260 MOV #340, ERRVEC +2 2 SET NEW PS TO PRIORITY LEVEL 7-KERNEL 
526 012767 002456 157514 MOV WGMERR , MMV ;LOAD MEMORY MANAGENT ROUTINE INTO VECTOR 
1037 020534 012767 000340 157510 MOV #340 PWEC SD. SET NEW PS TO PRIORITY LEVEL 7-KERNEL 
1038 020542 012700 17777, MOV #-1 »RO :PUT T -1 INTO RO TO hn ae FLAGS 
1039 020546 010067 161634 MOV RO, TIMFLG Z INITIALIZE CPU ERROR FLAG 
1040 020552 010067 161702 MOV RO. MGYFLG Z INITIALIZE MEMORY MANAGEMENT ERROR FLAG 
1041 020556 012767 000340 160510 MOV #340, TBITPS s INITIALIZE LOG THAT HOLDS T-BIT PSwW 
1042 020564 005067 157002 INIT: CLR MRO ‘BE SURE MEM. MGMT IS OFF TO START WITH, 
1043 020570 012767 000020 151720 MOV #B1T4 MARS ;BUT TURN ON 22-81T ADDRESSING MODE 


1044 020576 004767 161216 JSR PC ,APRINIT ; JUMP TO PAR/PDR INIT ROUTINE 


F 
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GET VALUE FOR SOFTWARE SWITCH REGISTER SEQ 0031 
1046 2F Nak a tad 6 Nat ook 0 Vad 2 Ved o Nel 0 Vel c bed c Nols helo el c Yad & Vek 0 Weld Vole el o Nal oo % 
1047 “SBTTL GROUP 5 /ACCESS CONTROL FIELD/SPECIAL ABORTS TESTS 
1048 oF shed « Sal «hat wo Nal 0 hol o Nok 2 ol fatal a tal 6 twle tal a had ahal as bal a Vet a ed o Vet et aX 
1049 
1050 
1051 LRA RAE REAR ERE AREER EERE RER REAR ERERRRRAEERERER ERE EE 
1052 a 
1053 te THE NEXT THREE (3) TESTS CAUSE MEMORY MANAGEMENT ERRORS 
1054  e TO CHECK T THE ABILITY OF STATUS REGISTER 0 TO RECORD kK 
1055 * ERRORS AND THE ABILITY OF STATUS REGISTER 2 TO LOCK iP THE 
105 :* VIRTUAL ADDR. OF THE INSTRUCTION THAT CAUSED THE ERROR. 

105 :* THE BITS OF SR2 ARE CHECKED AND BITS <15:13>, <6:5>, AND <3:0> 
1058 ie ARE CHECKED IN SRO. SO THE SRO AND SR2 LOGIC AND THE 
1059 te KT ERROR LOGIC ARE CHECKED. 
1061 MITTTTITITITTTTTILTTTLETETT TEER ETET LTTE LET EEE T EEE EE EE EEE 
: 
ion FL ERR ERE REAR REERREKERAEREREKEAEERERRERREREKEKREREERREREERRERERER EE 
p*TEST 1 NON-RESIDENT ABORT TEST (ACF=084) 
** 
fia THIS TEST CHECKS THE ACCESS te FIELD (ACF) COMPARATOR 
* LOGIC BY CAUSING NON-RESIDENT ABORTS IN KERNEL, SUPERVISOR 
:* AND USER MODES. PDR 4 IS LOADED WITH ACF'S = 0&4 AND 
te THEN PHYSICAL ADDR. 60000 IS ACCESSED TO CAUSE THE AABORT. 
3* 
DAA AO EIEIO IOUS IOIIIIOISIIIIIIOIIIIIOIDUIOIIISIIIIOIIOD 
Bt 020602 000004 TST1: SCOPE 
1073 02 012700 000600 1$: MOV #600,RO :LOAD DATA FOR PAR'S INTO RO 
1074 020610 010067 151532 MOV RO, KIPAR3 ‘MAP KERNEL PAR'S 384 TO 12-16K 
1075 020614 010067 151530 MOV RO.KIPARG 
1076 010067 151422 MOV RO. SIPAR3 :MAP SUPERVISOR PAR'S 384 TO 12-16k 
1077 020624 010067 151420 MOV RO. SIPARG 
1078 020630 010067 157012 MOV RO.UIPAR3 :MAP USER PAR'S 384 TO 12-16k 
1079 020634 010067 157010 MOV RO, UIPARG 
1080 020640 012700 060000 MOV 6000 ZLOAD VIRTUAL ADDR. TO REFERENCE PDR3 INTO RO 
1081 020644 012701 100000 MOV #100000,R1 [LOAD VIRTUAL ADDR. TO REFERENCE PDR4 INTO R1 
1082 020650 012703 100011 MOV #100011.R3 ‘LOAD R3 WITH WHAT SRO SHOULD READ - N.R., KERNEL, PG.4 
1083 020654 012702 077400 MOV #774.00,R2 ‘LOAD ACF=0 (NON-RESIDENT) PDR VALUE IN R2 
1084 020660 012767 020734 157362 2$: MOV #5$ ,MAVEC ‘POINT MEM. MGMT. TRAP VECTOR TO 5$ BELOW 
1085 020666 010267 151416 MOV R2,KIPDR4 [LOAD ACF TEST VALUE INTO KIPDR4 
1086 020672 010267 151312 MOV R2.SIPDR4 ‘LOAD ACF TEST VALUE INTO SIPDR4 
1087 020676 010267 156706 MOV R2,UIPDR4 SLOAD ACF TEST VALUE INTO UIPDR4 
1088 020702 012767 020716 160200 MOV #3$,SLPERR ‘SET LOOP ON ERROR POINTER TO 3$ 
1089 020710 012767 000001 156654 MOV #1, MRO ‘TURN ON MEMORY MANAGEMENT 
1090 020716 005010 3$: CLR (RO) SCLEAR PHYS. LOC. 20000" USING PDR3 
1091 020720 016767 157052 160250 MOV PSw,$TMPO SSAVE PSwW IN CASE OF ERROR 
1092 020726 005211 4$: INC (R15 ‘TRY TO REF. IT USING PDR4 - SHOULD TRAP TO 5$ 
1093 020730 104003 ERROR +3 *MEM. MGMT. ABORT DID NOT OCCUR 
1094 ‘FOR TIGHTER SCOPE LOOP 
1095 ;REPLACE ERROR CALL WITH 
1096 :'BR 3$°' = 000772 
1097 020732 000425 BR 8$ ‘BRANCH AROUND STATUS REG. CHECKS IF NO ABORT 
1098 020734 062706 000004 S$: ADD #4,SP SRESTORE STACK POINTER 
1099 020740 005710 TST (RO) :DID INSTRUCTION GET ABORTED & NOT EXECUTE 
1100 020742 001401 BEQ 6$ CH IF 


IF YES 
1101 020744 104004 ERROR +4 S INSTRUCTION WAS NOT ABORTED, LOC. GOT CHANGED 
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NON-RESIDENT ABORT Test 
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— 4 Ss 

SERS 
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RRSRS 
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cal ily cil aly cally ail ly eal ld cal ly els aly al els el el aly eal cl cl cel el el cal cls lh el cael lh el cel el calls ci cl lel ce cl 
woo 
on 


ap thet ne tec eigen Te Te ee eee ee 
ed ed ed ed ed ed aed aed ed 
SS SBIKAGRUNSSYSVRARAVD VS SHUTS ARAN ASSRIKARALT 


"72 eee - 


016767 


012767 
012767 


156620 
156616 
160276 


020726 
160266 


156560 
140000 


100151 
140000 


MACRO M1111 
(ACF =084) 


7$: 


8$: 
160156 


156742 
160132 


156716 
9$: 


10$: 


157770 
157122 


11$: 


G 
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SRO ,WASSRO 
SR2,WASSR2 
Sete 


+5 


M4$ RS 
R4 ,WASSR2 
8$ 


+6 


MMRO 
ore 


#100151,R3 
ee 
ances: 
#100051 ,R3 
 emaden 
#77404 ,R2 


10$ 
#77404,R2 
#100011,R3 
PSwW 

2s 


PSW 
#1$,$LPERR 
AMGMERR , MMVE C 





SEQ 0032 


FOR TIGHTER SCOPE LOOP 
REPLACE, ERROR CALL WITH 
3$°* = 000764 


;READ STATUS aeeisres 0 


ES 
: SRO DID NOT REPORT NON-RES. ERROR CORRECTLY 
;FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
;'BR 3$"’ 752 


[LOAD R4 WITH WHAT SR2 SHOULD 


READ 
:DID SR2 ers RIGHT VIRTUAL ADDR. (=4$)? 


BRANCH IF YES 
:SR2 DID NOT LOCK rr ee ADDR. OF NON-RES. ERROR 


FOR TIGHTER SCOPE 
: REPLACE ERROR CALL WITH 

BR 3$"" = 000744 
; TURN OFF MEMORY MANAGEMENT 
;HAS oe BEEN TESTED IN USER YET 
SBRANCH_IF YES 
;LOAD R3 WITH WHAT SRO SHOULD READ - N.R., USER, PG.4 
:GO TO USER MODE 
:REPEAT TEST IN USER MODE 

ae BEEN TESTED IN SUPERVISOR YET 
‘BRANCH I F YES 
LOAD R3 WITH WHAT SRO SHOULD READ - N.R. 
:GO TO SUPERVISOR MODE 
;REPEAT TEST IN SUPERVISOR MODE 
HAS ACF=4 BEEN TESTED YET? 
BRANCH IF YES 
: THEN LOAD ACF=4 (NON-RES) PDR VALUE IN R2 
;LOAD R3 — bes WHAT SRO SHOULD READ-N.R. KERNEL .PG. 4 
:GO BACK TO KERNEL MODE 
:GO BACK TEST ACF=4 IN SAME MODE 
;GO BACK TO KERNEL MODE BEFORE LEAVING 
;RESET LOOP ON ERROR POINTER TO 1$ 
RESTORE ADDRESS OF NORMAL MEMORY 
:MANAGEMENT ERROR ROUTINE TO MMVEC 


- SUPERVISOR, PG.4 


H 
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T2 READ-ONLY ABORT TEST (ACF =2) 


1151 'WeeAARAAARAARARARRSRALASLARRARARE LALA AR ARR RRLAR ALAR RRR R ARRAS DD AS 


;*TEST 2 READ-ONLY ABORT TEST (ACF=2) 


THIS TEST CHECKS THE ACCESS CONTROL FIELD (ACF) COMPARATOR 
LOGIC BY CAUSING oa tate ABORTS IN KERNEL, SUPERVISOR AND 
USER MODES. PDR 4 IS LOAD WITH ACF=2 AND THEN 

PHYSICAL ADDR. 60000 IS WRITTEN TO cause THE ABORT. 


SERRA AEAEAREEAEAAAERAARARAAAAERARAAARARARRAAEARARREEE 


;KERNEL, SUPERVISOR AND USER PAR'S 3 & 4, 
TAND PDR 3 ARE SETUP FROM LAST TEST 
;LOAD VIRTUAL ADDR. TO REFERE PDR3 INTO RO 

;LOAD VIRTUAL ADDR. TO REFERENCE PDR4 INTO R1 

; LOAD WITH WHAT SRO SHOULD READ - R/O, KERNEL, PG.4 
;LOAD ACF=2 (READ-ONLY) PDR VALUE IN R2 

157072 : 5$ .MMVEC [POINT MEM, MGMT. TRAP VECTOR TO S$ BELOW 


«Be Se Se Be Be 
Pu. se eee 


™ 
oa 
— ee 
—_—— 
Vn 


4m Ys ss Ss SH =! 
BRKSESKES S 


N“N 
—~m 


R2,UIPDR4 ; PDR4 
157710 #3$,SLPERR ;SET LOOP ON ERROR ered TO 3$ 
MRO ; TURN MEMORY MANAGEME 
3$: (RO) CLEAR PHYS. LOC. 60000 USING PDR3 
156564 157762 PSwW,$TMPO [SAVE PSW IN CASE OF ERROR 
4$: (R1) : TRY Y TO _ TE USING PDR4 - SHOULD TRAP TO 5$ 
ABORT DID NOT OCCUR 
“FOR TIGHTER SCOPE LOOP 
:RE PLACE ERROR CALL WITH 
= 000772 


:'BR 3$"° 

;BRANCH AROUND STATUS REG. CHECKS IF NO ABORT 
RESTORE STACK POINTER 

:DID bong Tt GET ABORTED & NOT EXECUTE 


BRANCH IF YES 
; INSTRUCTION WAS NOT ABORTED, LOC. GOT CHANGED 


4 ss SS SS YS YS YS YM I SY SI —. 


SOOCOOCOCSCOOCCOOCO CO 


—s 


ee kd ed od od 
MN 


AFRANVSSELIFALAV IS SSVFALAN 


1 
i 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
; 
1 
1 
1 





I 
CKKTBAO 11/44 MEM MGMT PRT B MACRO M1111 25=-SEP=79 12:24 PAGE 19 
T2 READ-ONLY ABORT TEST (ACF=2) 


FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
;"BR 3$°' = 000764 


016767 156332 : SRO,WASSRO TREAD STATUS REG. 0 
156330 SR2.WASSR2 :READ STATUS REG. 2 
160010 R3.WASSRO D SRO REPORT READ-ONLY ERROR CORRECTLY? 


BRANCH 
:SRO DID NOT REPORT R/O ERROR CORRECTLY 
ZFOR TIGHTER SCOPE LOOP 
ZREPLACE ERROR CALL WITH 
: BR 3S" = 000752 
021214 ; SLOAD R4 WITH WHAT SR2 SHOULD READ 
160000 ; :D1D she LOCKUP RIGHT VIRTUAL ADDR. (=4$)? 


<SR2 DID NOT LOCKUP VIRTUAL ADDR. OF R/O ERROR 
SFOR TIGHTER SCOPE LOOP 
:REPLACE ERROR CALL WITH 
"BR 3$"' = 000744 

156272 : MMRO STURN OFF MEMORY MANAGEMENT 

140000 157670 #140000,$TMPO HAS Acr=2 BEEN TESTED IN USER MODE? 

BNE 11$ [BRANCH IF YES 

020151 #20151,R3 LOAD RS UIA WHAT SRO SHOULD READ-R/O, USER, PG.4 

140000 156454 #140000, PSwW 7GO TO USER MODE 

:REPEAT TEST IN USER 


MODE 
157644 : — ‘os BEEN TESTED IN SUPERVISOR MODE? 


H_IF YES 
#20051 ,R3 LOAD R3 WITH WHAT SRO SHOULD READ-R/O, SUPERVISOR, PG.4 
156430 #40000 ,PSW :GO TO SUPERVISOR MODE 
2s [REPEAT TEST IN SUPERVISOR MODE 
: PSW :GO BACK TO KERNEL MODE BEFORE LEAVING 
157526 #1$,$LPERR ZRESET LOOP ON ERROR POINTER TO 1$ 
012767 156660 #MGMERR , MMVEC ;RESTORE ADDRESS OF NORMAL MEMORY 
MANAGEMENT ERROR ROUTINE TO MMVEC. 


4 KRERERRERRRRERREE REE REE RRE RRR ERR RARE ERERREARERRE RENEE RRR ERE 


:*TEST 3 TEST ILLEGAL MODE *‘10°° 


THIS TEST CHECKS TO SEE ead A 10 IN THE CURRENT MODE BITS OF THE 
PSwW WHILE MEMORY MANAGEMENT IS ON IS ILLEGAL. A 

MEMORY nana gel ABORT ee an AND Naat REGISTER 0 

SHOULD REPORT NON-RESIDENT MODE = 10, PAGE = 1 (100103). STATUS 
REGISTER. oy SHOULD LOCKUP THE AD ADDRESS OF THE INSTRUCTION 

THAT LOADED THE PSW. 


SEERA AAAEAEAAREAAAEAEAAAEEAEAAAAEAEAEEAEAAEAEAEAEARREERERERAEAEEEREREKERE 


#2$,SLPERR ;SET LOOP ON ERROR POINTER TO 2$ 
ore Sowec : LOAD MEM. MGMT. TRAP 3 WITH 3$ 


a 0 ‘TURN ON MEMORY MANAGEMENT 
#100000, PSwW SET 19. IN PSW CURRENT MODE BITS 
1225 021422 +30 TILLEGAL MODE 10 NOT ABORTED 
1226 ‘tor A TIGHTER SCOPE L 

1227 ;REPLACE ERROR CALL with 

1228 :’BR 28" = 00077 

1229 021424 000424 5$ “BRANCH AROUND SRO & SR2 CHECKS 
#KERSTK,SP SRESTORE STACK POIN 


TER 
#100103,R1 LOAD EXPECTED CONTENTS OR SRO INTO R1 
1232 021436 016767 157620 SRO ,WASSRO [READ CONTENTS OF SRO 


SESE SE SASS TENET CN CaS 
MmrMNnNn 
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T3 TEST ILLEGAL MODE For SEQ 0035 


Ww 
Ww 


020167 157614 R1,WASSRO ;DID SRO REPORT ILLEGAL MODE CORRECTLY? 
001401 4$ BRANCH IF YES 
104031 +31 re DID NOT REPORT NR ABORT, PG=1, MODE=10 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
3'BR 2$" = 000757 
021454 012701 : #2$,R1 [LOAD EXPECTED = OF SR2 INTO R1 
021460 157602 SR2 ,WASSR2 ;READ CONTENTS OF SR 
021466 R1,WASSR2 [DID SR2 LOCKUP VIRT. ADDR OF ABORTED INST. 
46 O21 $ BRANCH IF YES 


+13 3SR2 DID NOT LOCKUP VIRT. ADDR. OF ILL. MODE INST. 
:FOR TIGHTER SCOPE LOOP 
:REPLACE, Erne CALL WITH 

156066 #160000 , SRO CLEAR POSSIBLE pr BITS IN 

156536 #MGMERR ;RESTORE MEM. ABORT 


249 021504 2456 C VECTOR 
iy 021512 012767 021372 157370 #1$,SLPERR RESET LOOP ON ERROR POINTER TO 1$ 


ee ee ce a ce a a ed et ad ed edd 
RRERGALSSSEIEGE 


= 
s 
ise 
ab 
S 
Oo 


CEE EEEEAAAEREAERARKEEEEAREREEEKEKEAEEKEAKEREREERKEEK 


** 
:* THE NEXT TWO Ay TESTS WILL BE CHECKING THE PAGE LENGTH 

s@ COMPARATORS AND SOME MORE OF THE KT ERROR DETECTION 

s@ AND STATUS LOGIC. THE PAGE LENGTH FIELD (PLF) IN KERNEL 

bed PDR 4 IS VARIED AND FOR EVERY PLF, THREE (3) VIRTUAL 

bd ADDRESSES ARE READ. WHILE USING BOTH UPWARD & DOWNWARD PAGE 
be EXPANSION, ONE OF THOSE THREE VIRTUAL ges ia WILL CAUSE A 
-* 

te 

3* 

xe 

7* 

$* 

- 


"PAGE LENGTH ABORT’ WHILE THE OTHER TwO 


STATUS REGISTER 0 & 2 “. CHECKED ant THE PAGE LENGTH 
ABORT DOES OCCUR TO SEE THAT THE ABORT IS REPORTED AND THAT 
oe ee OF THE INSTRUCTION THAT CAUSED THE ABORT 


SEERA AEKEREREKEEEEEEREKEKEERERAKEKEREREREKKEKEKEREKEREKEEKREEKEKEEKEKEK 


J PARA EERE AREER AEEEKEEAEEEKEEREKAEREKEEREREREKEAEEERKEEEEREEREEREREREH 


ssTEST 4 PAGE LENGTH FAULTS-UPWARD EXPANSION 


THIS TEST VARIES THE PAGE LENGTH FIELD (PLF) IN KERNEL PDR 
FROM 1 TO 177 AND FOR EACH PLF, THREE ie 

ARE ACCESSED. N 

NO ABORT 


A PAGE LENGTH ABORT SHOULD OCCUR 
THE PAGE EXPANSION DIRECTION IN THIS TEST IS UPWARD, (THE ED BIT 
(BIT 3) OF PDR 4 = 0). 


SEERA ARAEAARAEAEAAAAEARAEAAEEAEAAARAEEREREEAEAAAEEAEEERAEAEREREAREEEEKE 


14: 
#77406,KIPDR3 MAKE SURE PDR3 IS DESCRIBED AS R/i 

#77406.KIPDR5 :MAKE SURE PDRS IS DESCRIBED AS R 

#100000, RO : TO SELECT SORA” INTO RO 

#406,R4 ALUE IN R4 (PLF=1, ACF=6) 

#9$ ,MAVEC “SETUP M.M. TRAP VECTOR FOR UNEXPECTED ABORTS 


Be De Be Fae Be 
Av: sen eenennne 


me mete Be Be Be Be Be He & ‘oe 
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4 AGE LENGTH FAULTS-UPWARD EXPANSION 


m 
3 
Uv 


R4.KIPDR4 SLOAD KIPDR4 WITH PAGE LENGTH VALUE 
157322 #3$,$LPERR :SET LOOP ON ERROR POINTER TO 3$ 
3$: #KERSTK,KSP [MAKE SURE STACK POINTER IS ALL SET UP 
(RO) Rt TACCESS VIRTUAL AD (VBA < PLF 
#100.R :F ORM NEXT VIRT 
157302 #6$ SC PERR 
4$: #KERSTK,KSP PAKES 
(RO) ,R1 ZACCE ADDR. (VBA=PLF - NO ABORT) 


#100.RO RTUAL _ADDR_IN RO 
RO,#117700 ;HAVE ALL PLF'S BEEN TESTED YET? 
10$ F ALL VBA'S & PLF'S HAVE BEEN USED 

157254 #5$,SLPERR 3SET LOOP ON ERROR POINTER TO 5$ 

156406 #6$ ,MAVEC “SETUP M.M. TRAP VECTOR FOR EXPECTED ABORT 
(RO) ,R1 TACCESS VIRTUAL ADDR. (VBA > PLF =- ABORT TO 6$) 
+10 SEXPECTED PAGE LENGTH ABORT DID NOT OCCUR 


:FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
= 000776 


RRRVCVCLVCRUCRG 


8$ ; BRANCH AROUND ABORT CHECKS 
: MKERSTK ,KSP RESTORE STACK POINTER FOLLOWING ABORT 
157402 0. WASSRO sREAD M.M. STATUS REG. 0 
157400 ;READ M.M. STATUS REG. 2 
PUT EXPECTED SRO CONTENTS IN R2 
:DID SRO at rig PG. LENGTH ABORT, PAGE 4, KERNEL? 


HIF 
SRO DID NOT REPORT PG. LENGTH ABORT CORRECTLY 
ZFOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
‘BR 5$"* = ons oko 
SPUT EXPECTED SR2 CONTENTS IN R3 
DID ng Lock ¥ VIRT. ADDR. OF ABORTED INSTRUCTION? 


:SR2 DID NOT LOCKUP VIRT. ADDR. OF ABORT CORRECTLY 
FOR TIGHTER SCOPE LOOP 

:R PLACE ERROR CALL WITH 

7‘BR 5$"" = 000751 


Ay oy se SRO CLEAR ERROR BITS IN SRO 
#400.R ; T PLF VALUE FOR KIPDR4 
#100, RO FORM FIRST VIRT. ADDR FOR THAT PLF VALUE 
2s og AND as 3 VBA'S FOR 
3: THE UE og F ORME D 
(KSP)+,TRAPPC SAVE PC & PS OF T 


eee CONTENTS OF SRO FOR ERROR 


BECKS RES Se setae TS 


RRORVVLS 


eed et od wd ed od 
MEWN—OOONOUSWN—O 
oooo 
tt xt 


BSSERS 


IN_SRO 
T PG. LENGTH ABORT BEFORE IT WAS EXPECTED 
“FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
TRAPPS , = (KSP) ‘PUT PC & PS OF TRAP ON STACK 
TRAPPC , = (KSP) 
RETURN FROM UNEXPECTED ABORT 


157074 : #1$,S$LPERR :RESET LOOP ON ERROR POINTER TO 1$ 
156226 WMGMERR .MMVEC  ;RESTORE NORMAL M.M. TRAP ae 
ZADDRESS TO M.M. TRAP VECT 


SUSAR 


EEF 
Whoo 
oS 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
7 
1 
1 
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PAGE LENGTH FAULTS-UPWARD EXPANSION SEQ 0037 


1 
135 
1359 33 MARARARASLLLALASASALAAL EAL ALAR EAR AAR ARLES AAR AR AR AR RAR RRR L ADDS DSS 


+ *TEST 5 PAGE LENGTH FAULTS-DOWNWARD EXPANSION 


THIS TEST VARIES THE PAGE LENGTH FIELD (PLF) IN KERNEL PDR4 

FROM 176 TO O AND FOR EACH PLF, THREE a og ADDRESSES (VBA'S) 

ARE ACCESSED. WHEN VBA <12:6> IS GREATER THAN OR E PDR i 8> 
NO PAGE owed SHOULD OCCUR. WHEN VBA 

Oe eee ABORT SHOULD OCCUR AND BE RE SR 

THE PAGE EXPANSION DIRECTION IN THIS TEST IS DOWNWARD, (THE ED BIT 
(BIT 3) OF PDR4=1). 


RARER ARARAARARAERAERAREAEAEKEERARAAEKEERRERERERAEEARKEKEKEEERKEKERERKE 


§ 
8 
= 
3 


ERERERESES 


156206 
157034 


157014 


3 


An: Porerererar ar ar are 


o— 
Ww 


med mee Be Oe He Be Be Be Be He Oe 


™ 
wa 


ww 
wn 


i 
wn 


#117700,R0 
#77016,R4 
MAV 


#9$ ,MAVEC 
R4 .KIPDRS 
#3$ ,SLPERR 
#KERSTK,KSP 
(RO) RI 
#4$,$LPERR 
#KERSTK,KSP 
(RO) ,R1 
0,4100000 


LOAD VIRTUAL ADDR. TO SELECT PDR4_INTO RO 
LOAD FIRST PDR VALUE _IN R4 (PLF=176,ACF=6) 
[SETUP M.M. TRAP VECTOR FOR UNEXPECTED ABORTS 
;LOAD KIPDR4 WITH PAGE LENGTH VALUE 
3SET LOOP ON ERROR POINTER TO 3$ 
MAKE SURE STACK + ad IS A SET UP 
RTUAL (VBA > PLF 


T 
sMAKE SURE STACK POINTER IS ALL SET UP 
FORM NEXT VIRT ADDR. (VBA=PLF - NO ABORT) 


TUAL ADDR. _IN RO 
HAVE ALL PLF'S BEEN TESTED YET? 


BRANCH IF ALL VBA'S & PLF'S HAVE BEEN USED 
SET LOOP ON ERROR POINTER TO 5$ 

;SETUP_M.M. TRAP VECTOR FOR EXPECTED ABORT 
ZACCESS VIRTUAL ADDR. (VBA < PLF - ABORT TO 6$) 
ZEXPECTED PAGE LENGTH ABORT DID NOT OCCUR 

:FOR TIGHTER SCOPE LOOP 

ZREPLACE ERROR CALL WITH 

;'BR 5$"* = 000776 


BRANCH AROUND ABORT CHECKS 
RESTORE STACK POINTER FOLLOWING ABORT 
NE STATUS REG. 0 


156766 


10 
#5$,SLPERR 
156120 #6$ ,MAVEC 


(ROS ,R1 
+10 


RORGLOLLOCUCUCUCUS 


Nononananononn 
NENEVEVSS 


oS 
Nm 


8$ 
#KERSTK ,KSP 
157114 SRO,WASSRO ° 
157112 REG. 2 

CTED SRO CONTENTS IN R2 
:DID D my REPORT PG. LENGTH ABORT, PG. 4, KERNEL? 


H IF YES 
SRO DID NOT REPORT PG. LENGTH ABORT CORRECTLY 
;FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
:"BR 5$" = 000757 
:PUT EXPECTED SR2 CONTENTS IN R3 
:DID SR2 LOCKUP VIRT. ADDR. OF ABORTED INSTRUCTION? 


; BRANCH 
7SR2 DID NOT LOCKUP VIRT. ADDR. OF ABORT CORRECTLY 
;FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
;"BR 5$°* = 000751 
#160000. SRO ; CLEAR ERROR BITS IN 7” 0 
#400,R ;FORM NEXT PLF VALUE FOR KIPDR4 
#100, RO ;FORM FIRST VIRT. ADDR. FOR THAT PLF VALUE 


SERNSESS 
SEVRKSAEE 
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380 
381 
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383 
384 
385 
386 
387 
388 
389 
390 
391 
39 

39 

3% 
395 
396 
397 
398 
399 


2206 155356 
162704 
401 022220 


8 
oo 
Mong 
N 
N 
—_ 
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1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
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1 
1 
1 
1 
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TS PAGE LENGTH FAULTS=DOWNWARD EXPANSION 


ae 022224 2$ ;BRANCH BACK AND ae Se a VBA'S FOR 


:THE PLF VALUE JUST 
(KSP)+,TRAPPC SAVE PC & PS OF me 
(KSP) +. TRAPPS 
SRO,WASSRO :SAVE CONTENTS OF SRO FOR ERROR 
SR2,WASSR2 ‘SAVE CONTENTS OF SR2 FOR ERROR 
#160000, SRO : CLEAR ERROR BITS IN SRO 
PG. LENGTH ABORT BEFORE IT WAS EXPECTED 

TFOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
tA ‘NOP’ = 000240 
‘PUT PC & PS OF: TRAP ON STACK 


;RETURN FROM UNEXPECTED ABORT 
012767 6606 : #1$,$LPERR ;RESET LOOP ON ERROR POINTER TO 1$ 


012767 A#MGMERR ,.MMVEC ;RESTORE NORMAL M.M. TRAP HANDLER 
zsADDRESS TO M.M. TRAP VECTOR 


016746 TRAPPS , = (KSP) 
016746 156766 TRAPPC , = (KSP) 
000002 


AESSaVAARUVZOS 


REE KEAEEREREREEAEERAEKEARAERAKEAAKEAERAERARAEAAEREAEEKREKERREKE 


;*TEST 6 SR2 BIT TEST 


THIS TEST CHECKS THE BITS IN MEMORY MANAGEMENT REGISTER 2 BY 
"READ Y ABORTS'’ AT VIRTUAL ADDRESSES BETWEEN 100000 
SSES _060000-071000). KIPDR4 IS USED TO EXECUTE 
HRU MEMORY : 


NG FOUR OF 
010727 MOV PC,(PC)+ ; 
z1TS VIRTUAL ADDR. SHOULD BE LOCKED UP IN SR2 
000137 JMP ar3$ THIS INSTRUCTION IS ALSO MOVED THRU MEMORY 
(ADDR. OF 3$) 7 IN CASE A_R/O ABORT DOES NOT OCCUR, 
SIN WHICH CASE SR2 WILL NOT CONTAIN CORRECT ADDR. 


SEERA AAEEEARARARAERARAEAAAEERRAEAEAEAAEERAEAAAERAAAAERAERAERAEEREREREREE 


ee SURE PAR3 IS MAPPED TO 12~16k 


Té6: 


* 
* 
* 
tt 
we 
* 
* 
* 
* 
* 
° 
S 
$: 


f 
1 


022310 000004 
1436 022312 000600 
1437 022320 000600 
077406 
077402 #77403, i 
060000 


100000 *0SG06" 4 

022406 #3$, Mave 

022366 #2$.$L POINTER TO 2$ 

010727 : MOV aoi6r27, tRO)+ "MOV PC (PC) + INSTRUCTION AT ADDR. 
REACHED THRU PDR/ 


1445 
1446 022374 
144 


7 022400 


022404 
1449 022406 
1450 022412 
1451 022420 
1453 022426 
1454 
1455 


1456 
1457 022430 


; PAR 
#900137 (RO)+ LOAD "UMP a#3$'* INSTRUCTION AT vin ~ 


, (ROS 
R1,PC 
#KERSTK,KSP 
SR2,WASSR2 
RI ,WASSR2 


4 
+13 


#160000, SRO 


IN CASE R/O yi DOES 
FER PROGRAM EXECUTION TO NAGE 4 INSTRUCT IONS’ 
“RESTORE STACK POIN 


NTER 
> READ CONTENTS OF STATUS REG 2 : 
WAS ADDR. OF “RELOCATED - R/O ABORT’ LOCKED UP? 
‘BRANCH IF YES 
DID NOT LOCK UP VIRTUAL ADDR. OF R/O VIOL. 
SCOPE LOOP 


“CLEAR THE ERROR BITS IN SRO 
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SR2 BIT TEST SEQ 0039 
1458 022436 162700 000004 SUB #4, RO :RESET RO TO POINT TO NEXT VIRT. ADDR. TO LOAD 
1459 022442 062701 000002 ADD #2.R1 ORM VIRTUAL ADDR. THAT SHOULD BE LOCKED UP NEXT 
1460 022446 020127 111002 CMP R1.#111002 HAVE ALL. VBA'S 100000-111000 BEEN TESTED? 
1461 022452 103745 BLO 2$ BRANCH IF NO 
1463 022454 012767 022312 156426 5S: MOV #18, $SLPERR ;RESET LOOP ON ERROR POINTER TO 1$ 
1464 022462 012767 077406 147620 MOV #77406,KIPDR4 RESTORE PDR4 TO R/wW ACCESS 
1465 022470 012767 002456 155552 MOV WMGMERR ,MMVEC RESTORE ADDRESS OF NORMAL M.M. 

1466 STRAP HANDLER TO M.M. VECTOR 
1281 
1482 FRA EEEREREEREREEAEEEEREEREREERREEERERERERERRAEREREEERERRE EH 
TATEST 7 MORE CHECKS OF SRO & SR2 
** 
te THIS TEST PERFORMS SOME ADDITIONAL CHECKS OF THE SRO & SR2 LOGIC. 
zs FIRST IT CHECKS THAT SR2 ‘'TRACKS'’ ALONG ACTING AS A VIRTUAL ADDRESS 
is PROGRAM COUNTER. ALSO SRO & SR2 ARE LOCKED UP BY A PAGE LENGTH 
zs ABORT, THEN WITHOUT {CLEARING SRO'S ERROR BITS. A R/O ABORT IS CAUSED. 
ie SRO €'SR2 SHOULD NOT BE CHANGED BY THE SECOND ABORT AND THE 
zs INFORMATION ABOUT THE PAGE LENGTH ABORT SOULD STILL BE LOCKED UP. 
:* IN ADDITION A "RESET 1S EXECUTED 10 VERIFY THAT SRO IS CLEARED 
is AND SR2 IS UNLOCKED BY A RESET. AFTER MEMORY MANAGEMENT IS TURNED BACK ON, 
:* SR2 1S CHECKED TO SEE THAT IT IS TRACKING AGAIN. 
** 
*: ; REE AEAEKRAAREREERAEEEAERARARAARAEREERAAARAREEEEEEEE 
TST SCOPE 
1483 022500 012767 000600 147644 15: MOV #600. KIPARS MAP KERNEL PAGE 5 TO 12-16K 
1484 022506 012767 000406 147574 MOV #406, KIPDR4 [SETUP PDR4 FOR PAGE LENGTH ABORT 
1485 022514 012767 077402 147570 MOV _- #77402,KIPDRS SETUP PDRS FOR R/O ABORT 
1486 022522 012767 022530 156360 MOV #2$,$LPERR SET LOOP ON ERROR POINTER TO 2$ 
1487 022530 016767 155042 156532 28: M SR2.WASSR2 READ SR2 TO SEE IF ITS TRACKING 
1488 022536 012701 022530 MOV = #2$.R1 PUT EXPECTED VIRTUAL PC IN R1 
1489 022542 020167 156522 CMP  —s R71, WASSR2 ;D1ID SR2 CONTAIN VIRTUAL PC AT 28? 
1490 022546 001401 BEQ 3$ CH IF YES 
1491 022550 104016 ERROR +16 “SR2 NOT TRACKING CORRECTLY 
1492 FOR TIGHTER SCOPE LOOP. 
1493 ZREPLACE ERROR CALL WITH 
149% :'BR 28" = 000767 
1495 022552 012767 022560 156330 38: MOV  § #4$, $LPERR SET LOOP ON ERROR POINTER TO 4$ 
14% 022560 016767 155012 156502 4$: MOV SR2.WASSR2 TREAD SR2 TO SEE IF ITS TRACKING 
1497 022566 012701 022560 MOV #4$.R1 PUT EXPECTED VIRTUAL PC IN R 
1498 022572 020167 156472 CMP  —s-R1, WASSR2 :DID SR2 CONTAIN VIRTUAL PC AT 4$ 
1499 022576 001401 BEQ $ BRANCH IF YES 
1500 022600 104016 ERROR +16 7SR2 NOT TRACKING CORRECTLY 
1501 [FOR TIGHTER SCOPE LOOP 
1502 : REPLACE ERROR CALL WITH 
1503 :'BR 4$" = 000 
1504 022602 012767 022610 156300 5$: MOV § #6$, SLPERR SET L (OOP ON ERROR POINTER TO 6$ 
1505 022610 012767 022626 155432 68: MOV = #7$ MVE PUT ADDRESS OF 7$ IN M.M. TRAP VECTOR 
1506 022616 005067 156356 CLR $TMP1 [CLEAR ERROR INDICATOR 
1507 022622 005237 100500 INC #100500 [CAUSE PAGE LENGTH ABORT - TRAP TO 7$ 
1508 022626 012706 001100 7$: MOV —s #KERSTK ,KSP ZRESTORE STACK POINTER AFTER ABORT 
1509 022632 016767 154734 156336 MOV SRO,$TMPO TSAVE SRO’S INFORMATION ON PG. LGTH. ABORT 
1510 022640 016767 154732 156334 MOV SR2.$TMP2 TSAVE SR2°S INFORMATION ON PG. LGTH. ABORT 
1511 022646 012767 022660 155374 MOV  § #8$ .MMVEC [PUT ADDRESS OF 8$ IN M.M. TRAP VECTOR 
1512 022654 005237 120000 INC a1 20000 [CAUSE R/O ABORT - TRAP TO 8$ 
1513 012706 001100 8$: MOV #KERSTK .KSP TRESTORE STACK POINTER AFTER ABORT 


bid 
q- 8S 


a 
— 
~ 


abababahadad 
OONAUSE 
Rahat z 


a kas ak ek ae ae ah es a ot as ss ss Ss es st ts st Ss st St SS Ss SS SS YS SS oS SS SS SI YS SY YY IY SI 
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N 
Oo 
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M MGMT PRT B 
CKS OF SRO & SR2 SEQ 0040 
016767 154702 156372 MOV SRO, WASSRO ;READ SRO FOLLWOING SECOND KT ABORT 
016767 154700 156370 MOV SR2,WASSR2 SREAD SR2 FOLLOWING SECOND KT ABORT 
26767 156272 156356 CMP STMPO,WASSRO  :1S SRO STILL HOLDING INFO ON FIRST ABORT? 
901402 BEQ 9$ BRANCH IF YES 
90526 156264 INC $TMP1 :SET ERROR INDICATOR 
026767 156262 156346 9S: CMP STMP2,WASSR2  :DOES SR2 STILL HOLD PC OF FIRST ABORT? 
901402 BEQ 10$ SBRANCH IF YES 
005267 156250 INC $TMP1 :SET ERROR INDICATOR 
005767 156244 10$: TST $TMP1 ; WERE SRO OR SR2 CHANGED BY A SECOND ABORT? 
001401 BEQ 11$ : H IF Oo 
104014 ERROR +14 ZONE OF STATUS REGS. CHANGED BY SECOND ASORT 
[FOR TIGHTER SCOPE LOOP 
ZREPLACE ERROR CALL WITH 
:'BR 6$'' = 000726 
005067 156234 11$: CLR $TMP1 SCLEAR ERROR INDICATOR 
000005 RESET sEXECUTE A RESET, APPLYING AN ‘‘INIT’’ 
016767 154620 156310 MOV SRO, WASSRO TREAD SRO 
005767 156304 TST WASSRO “WAS SRG CLEARED BY THE RESET? 
001402 BEQ 12$ ‘BRANCH IF YES 
005267 156212 INC $TMP1 :SRO NOT CLEARED BY A RESET 
016767 154604 156274 12$: MOV SR2,WASSR2 +R 
022767 022766 156266 CMP #12$,WASSR2 WAS SR2 UNLOCKED BY A RESET? 
001402 BEQ 13$ “BRANCH YES 
156170 INC $TMP1 :SR2 NOT. UNLOCKED BY A RESET 
005767 156164 13$: TST $TMP1 SWERE SRO & SR2 BOTH 'RESET’’ BY A RESET? 
001401 BEQ 14$ BRANCH IF YES 
104015 ERROR +15 :SRO OR SR2 NOT ‘RESET’’ BY A RESET 
[FOR TIGHTER SCOPE LOOP 
SREPLACE ERROR CALL WITH 
:'BR 6$'' = 000676 
005267 154546 14$: INC SRO ; TURN MEMORY MANAGEMENT BACK ON 
016767 154546 156236 15$: MOV SR2,WASSR2 TREAD SR2 TO SEE IF ITS TRACKING AGAIN 
012701 023024 MOV #15$,R1 [PUT EXPECTED VIRTUAL PC IN R1 
020167 156226 CMP R1,WASSR2 [DID SR2 CONTAIN VIRTUAL PC AT 15$ 
001401 BEQ 16$ SBRANCH IF YES 
104016 ERROR +16 'SR2 NOT TRACKING CORRECTLY 


FOR TIGHTER SCOPE LOOP 
sREPLACE, ERROR CALL WITH 
;'BR 6$'' = 000663 


012767 022500 156034 16$: MOV #1$,S$LPERR SRESET LOOP ON ERROR +g TO 1$ 
012767 077406 147226 MOV #77406,KIPDR4 RESET PDR4 TO 128 BLKS, R/W 
012767 077406 147222 MOV #77406,KIPDRS RESET PDRS TO 128 BLKS, R/W 
012767 002456 155152 MOV WMGMERR,MMVEC  :RESTORE ADDRESS OF NORMAL MEMORY 


:MANAGEMENT TRAP ROUTINE TO M.M. VECTOR 


C 4 
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T10 SUPER/USER ABORT PICKS UP KERNEL VECTOR 


1574 REAR E REE E EEE EE REE EERE REEEREEREREREERERERERRREEREREE ES 


:STEST 10 SUPER/USER ABORT PICKS UP KERNEL VECTOR 


THIS TEST CHECKS TO BE SURE THAT WHEN AN ABORT OCCURS WHILE 

IN SUPERVISOR OR USER MODE, THE TRAP VECTOR INFORMATION 

FETCHED IS TAKEN FROM KERNEL SPACE. USER PAGE 0 IS MAPPED 

TO 12k (60000-77776) SO THAT IF USER SPACE IS USED INSTEAD 
T WAS D AT 060004 I 


USED TO CAUSE A TRAP TO '' 


MARAAEAAAAASALASLASALAAASLASALAEASALAR ALARA RARE ALARA ARES SRSA DSS DS 


000004 es 
004767 157212 PC, TOF ; TURN OFF T=BIT TRAPPING FOR THIS TEST 
012767 023112 155776 wos, SLPERR SET LOOP ON ERROR POINTER TO 2$ 
005067 154660 : PSwW ;GO_TO KERNEL MODE 

78 023 012706 001100 #KERSTKKSP SETUP KERNEL STACK PTR. 


TEST USER MODE ABORT 


012767 000600 MAP USER PAGE 0 TO 12k 
MSS a4 ;LOAD KERNEL VECTOR 4 (LOC.4) WITH 4$ 
+ LOAD VECTOR+2 WITH NEW PSW 
TO USER MODE 
: SETUP USER STACK PTR. 
;LOAD USER VECTOR 4 (LOC. 60004) WITH 3$ 
LOAD VECTOR+2 WITH as ho 
CAUSE ODD ADDR. ERROR TRAP TO ‘'4*' 
;SHOULD PICK UP NEW PC=4$ FROM KERNEL 
;LOC. 4, NOT PC=3$ FROM USER LOC. 4 (=60004) 
! 023176 : 7SAVE PSW FOR ERROR 
93 023202 [SAVE VALUE OF STACK POINTER FOR ERROR 
023204 005067 BE SURE BACK IN KERNEL MODE 
5 023210 ;DID NOT TRAP THRU KERNEL SPACE 
ah TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
BR 2°’ = 000740 
PSW 7BE SURE BACK IN KERNEL MODE 
#KERSTK,KSP RESTORE KERNEL S.P. IN CASE IT CHANGED 
PARO TO 0-4K 


Ul SREMAP USER PAGE 0 T 
154542 #140000 ,PSW ER 


:GO TO USER MODE 
MUSESTK,USP SRESTORE USER STACK POINTER 
PSW ;GO BACK TO KERNAL MODE 


TEST THE SUPERVISOR MODE ABORT 


146766 #600, SIPARO MAP SUPERVISOR PAGE 0 TO 12k 
000004 #6$, a4 ZLOAD KERNAL VECTOR 4 WITH 6S 
000006 #340, a6 [LOAD VECTOR+2 WITH NEW PSW 
154502 #20000 ,PSw *60 TO SUPERVISOR MODE 
WSUPSTK, SSP ‘SETUP SUPERVISOR STACK PTR. 
000004 #5$, ans i LOAD SUPERVISOR VECTOR 4 (LOC. 60004) WITH 5$ 
000006 MOV #340, a#6 OAD VECTOR+2 WITH NEW PSW 
1615 023314 1 5$+1 cE RUSE ODD ADDR. ERROR TRAP TO ‘%'' 
1616 ‘SHOULD PICK UP NEW PC=6$ FROM KERNEL 


eur: eoeeebheeeese: 


et Se Be Be Be Be Be Be Be Be Be Be 
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SUPER/USER ABORT PICKS UP KERNEL VECTOR 


ie NOT PC= a FROM SUPERVISOR LOC. 4 (=60004) 
016701 154452 5$: Bbw FOR ERR 
P,R2 VALUE OF STACK POINTER FOR ERROR 
154444 VSURE BACK IN KERNEL MODE 
NOT TRAP THRU KERNEL SPACE 
TIGHTER SCOPE LOOP 
“REPLAC CE ERROR CALL WITH 
;'BR 2$'' = 000740 
PSW BE SURE BACK IN KERNEL MODE 
MKERSTK,KSP RESTORE KERNEL S.P. IN CASE IT CHANGED 
SIPARO ;REMAP SUPERVISOR PAGE 0 TO 0-4K 
154420 #40000 ,PSW :GO TO SUPERVISOR MODE 
MSUPSTK, SSP ;RESTORE SUPERVISOR STACK POINTER 
PSwW :GO BACK TO KERNEL MODE 
000004 , ATIMERR ,aa4 [RESTORE ADDR. OF NORMAL CPU TRAP HANDLER TO 4 
155506 ' #1$,$LPERR RESET LOOP ON ERROR POINTER TO 1$ 
156744 PC,TON 7 TURN T-BIT TRAPPING BACK ON 


: LEAR REE REE EERE EREREREEREEEEREEEEEERE KE 


s*TEST 11 RTI IN SUPER/USER MODE DOES NOT CHANGE PSW 
** 


THIS TEST CHECKS TO SEE THAT WHEN AN RTI IS EXECUTED IN SUPERVISOR 
OR USER MODE, THE MODE OR PRIORITY BITS OF THE PSW ARE NOT CHANGED. 


RIS% 
td and aod 
won 


GREK 


626 
627 
628 
629 
630 


1442 023406 000004 
1643 023410 012767 tess 155472 : Wee 5000 he ;SET LOOP ON ERROR POINTER TO 


2s 
00,R2 ;LOAD ‘PRESENT & EXPECTED’’ PSW VALUE INTO R2 
154350 : R2,PSW ;GO_TO PRESENT MODE-PRIORITY 0 
000340 #340,-(SP) ;PUT A_NEW PSW (PRIORITY=7) ON STACK 
023440 #3$,-(SP) PUT NEW PC ON THE STACK 
:DO AN RTI FROM PRESENT MODE 
154332 : PSW,R READ oy PSW INTO R1 
007437 :MASK OFF COND. CODE, T-BIT, AND UNUSED BITS 
154322 $ :GO BACK TO KERNEL MOD 
:DID PSwW STAY IN PRESENT MODE, PRIORITY=0? 
BRANCH IF YES 
zPSW CHANGED BY AN RTI FROM USER 
FOR A TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
;' BR=2$"' 760 


1657 

1658 023462 022702 050000 4$: #50000 ,.R2 ZF SUPERVISOR MODE HAS BEEN CHECKED, 
1659 023466 001403 5$ :GO TO END OF TEST 

1660 023470 012702 050000 #50000.R2 ELSE, SET ys ey MODE , 

1661 023474 000752 BR 2$ AND BRANCH BACK TO TEST iT. 

woe 023476 012767 023419 155404 5$: #1$,$LPERR RESET LOOP ON ERROR POINTER TO 1$ 





E 
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T12 KT ERROR NOT SERVICED IF ODD ADDR. SEQ 0043 
1676 TPRRBRRBSEAAAALASAALAAELASALALE ESLER ERE RARER ER RRR AR RRR ERE RRR RRR RAR SS SS 
:STEST 12 KT ERROR NOT SERVICED IF ODD ADDR. ERROR 
a THIS TEST CHECKS TO SEE THAT IF A CERTAIN VIRTUAL ADDRESS THAT 
:* WOULD CAUSE A MEMORY MANAGEMENT ERROR CAUSES AN ODD ADDRESS 
te ERROR EIRST THE ODD ADDRESS ERROR Is SERVICED BUT THE MEMORY 
:* MANAGEMENT ERROR ISN'T. THIS MEANS THAT SRO AND SR2 
:* SHOULD NOT REPORT THE ERROR OR LOCK UP ITS VIRTUAL ADDRESS. 
:* A. READ-ONLY VIOLATION IS USED AS THE POTENTIAL MEMORY MANAGEMENT 
** 
*“* 
*; b MeRBRRBAERSAAAAALALALALSALL ESAS ASESE SRE SESE SARE SSA S RRR RRR ARRAS AAAS ARS SE SG 3 
023504 000004 TS$T12: SCOPE 
1677 023506 012767 000600 146634 18: MOV #600, KIPARG MAP KERNEL PAGE 4 TO 12-16K 
1678 023514 012705 077402 MOV #77402 ,R5 *LOAD PDR4 DATA INTO RS 
1679 023520 010567 146564 MOV RS .KIPDRG [MAP PAGE 4 READ-ONLY 
1680 023524 012737 023554 000004 MOV #6$ a4 *SET CPU TRAP VECTOR TO ADDRESS OF 4$ 
1681 023532 012737 023552 000250 MOV #3304250 :SET M.M. TRAP VECTOR TO ADDRESS OF 3$ 
1682 023540 012767 023546 155342 MOV #2$,$LPERR :SET LOOP ON ERROR POINTER TO 2$ 
1683 023546 005267 034227 2$: INC 60001 :CAUSE ODD ADDR. ERROR & POTENTIAL R/O ABORT 
1684 023552 104020 3$: ERROR +20 “TRAPPED THRU M.M. VECTOR BUT SHOULDN'T HAVE 
1685 [FOR TIGHTER SCOPE LOOP 
1686 ;REPLACE ERROR CALL WITH 
1687 2$"" = 000776 
1688 023554 012706 001100 4$: MOV #KERSTK,KSP “RESTORE STACK POINTER AFTER TRAPPING 
1689 023560 005067 155414 CLR $TMP1 *CLEAR ERROR INDICATOR 
1690 023564 016767 154002 155472 MOV SRO,WASSRO ‘READ STATUS REG. 0 
1691 023572 016767 154000 155470 S$: MOV SR2.WASSR2 TREAD STATUS REG. 2 
1692 023600 012700 000017 MOV #17,RO [LOAD EXPECTED SRO CONTENTS INTO RO 
1693 023604 020067 155454 CMP RC, WASSRO [SRO ERROR BITS LEFT CLEAR BY TRAPPING? 
1694 023610 001402 BEQ 6$ [BRANCH IF YES 
1695 023612 005267 155362 INC $TMP1 *SRO ERROR BITS SET WHEN ODD ADDR. SERVICED 
16% 023616 012701 023572 6$: MOV #5$,R1 [LOAD EXPECTED SR2 CONTENTS INTO R1 
1697 023622 020167 155442 CMP R1,WASSR2 [WAS SR2 LEFT UNLOCKED BY TRAPPING? 
23626 001402 BEQ 7$ [BRANCH IF YES 
1699 023630 005267 155344 INC $TMP1 iSR2 LOCKED UP BY ODD ADDR. ERROR 
1700 023634 005767 155340 7$: TST $TMP1 [WHERE SRO OR SR2 EFFECTED? 
1701 023640 001404 BEQ 8$ Aye IF NO 
1702 023642 104021 ERROR +21 *SRO OR SR2 CHANGED BY ODD ADDR. ERROR 
1703 ;FOR TIGHTER SCOPE LOOP 
1704 ;REPLACE ERROR CALL WITH 
1705 "BR 2$"' = 000741 
1706 023644 042767 160000 153720 BIC #160000, SRO “CLEAR ERROR BITS THAT MAY BE SET IN SRO 
1707 023652 012737 002404 000004 8$: MOV ATIMERR, a4 [RESTORE ADDRESS OF NORMAL CPU TRAP HANDLER 
1708 023660 012737 002456 000250 MOV WMGMERR.a#250  :RESTORE ADDRESS OF NORMAL M.M. TRAP HANDLER 
1709 023666 012767 077406 146414 MOV #77406,KIPDR4  :REMAP PAGE 4 TO READ/WRITE 
1710 023674 012767 023506 155206 MOV #1$,$LPERR *RESET LOOP ON ERROR POINTER TO 1$ 
1726 
1727 DEERE EEEE EERE EEE EEE REEREEEREREEERREEREE 


;*TEST 13 PC & PSW SAVED FOR KT ERROR ON ODD ADDR. 


THIS TEST CHECKS THE PC AND PROCESSOR STATUS WORD SAVED WHEN 
A_KT ERROR OCCURS DURING THE SECOND PUSH ON THE STACK DURING 
SERVICING OF AN ODD ADDR. ERROR. DURING A DOUBLE ERROR"* 
SEQUENCE SUCH AS THIS, THE PSW SAVED WILL BE THE ONE PICKED UP 
FROM VECTOR+2 (LOC. 6 IN THIS CASE) AFTER THE FIRST TRAP, 


Bee Be Be Be Be Be Be 
see epee 


F 4 
CKKTBAO 11/44 MEM MGMT PRT B MACRO M1111 25=SEP=79 12:24 PAGE 21-1 
113 PC & PSwW SAVED FOR KT ERROR ON ODD ADDR. 


NOT THE PSW PRESENT BEFORE THE FIRST TRAP. SRO AND SR2 
SHOULD RECORD THE KT ERROR (A R/O VIOLATION BY THE USER STACK PTR.) 


NOTE THAT THE PREVIOUS MODE BITS <13:12> OF THE PSW 
WILL BE SET IN THE PSW THAT IS SAVED. 


MARASAAAAESALLLLALAASLSSALS LESSEE SARL ER RRA ARREARS ARAL READS SD SG 


“— 
TURN T-BIT TRAPPING OFF FOR THIS TEST 
;MAP USER PAGE 3 2-16K 
sMAP USER PAGE 
;MAP USER PAGE 


7 

7 

7 

7 RE WRITE 

7 M4$ a4 OF 4$ IN CPU (ODD ADDR.) VECTOR 

g 140017 000006 ;LOAD PSW THAT SHOULD BE PUT ON STACK IN VECTOR+2 
7 

7 

7 

7 


eur: see ee 


mt Be Be Be Be He oe 


023702 
728 0237 


[LOAD ADDRESS OF 4$ IN M.M. TRAP VECTOR 
[LOAD A KERNEL PSW IN MMVEC+2 
ae $LPERR SET LOOP ON ERROR POINTER TO 2$ 


153772 28: 140000,PSw :GO TO USER MODE 
24004 100002 ‘SET USER STACK PTR. SO SECOND PUSH IS IN PG. 3 
740 024010 053771 : 100005 ‘CAUSE ODD ADDRESS ERROR THAT WILL CAUSE 
‘R/O ERROR WHEN TRY TO SAVE OLD be 
000002 : ‘ :PUT PSW SAVED ON KERNEL STACK INTO R1 
:PUT PC SAVED ON KERNEL STACK INTO R3 
153544 READ THE CONTENTS OF M.M. STATUS REG. 0 
“READ THE CONTENTS OF M:M. STATUS REG. 2 
[CLEAR THE ERROR BITS IN SRO 
PSW ‘BE SURE IN KERNEL MODE 
#KERSTK,.KSP RESTORE KERNEL STACK POINTER 
#140000.PSW TO USER MODE 
#USESTK.USP RESTORE USER STACK POINTER 
PSW [GO BACK TO KERNEL MODE 
52 024072 $TMPO SCLEAR ERROR INDICATOR 
53 024076 020127 R1,4170017 [WAS THE PSW SAVED THE ONE PICKED UP BY THE 
‘ODD ADDR. TRAP FROM ERRVEC+2? 
; VALUE 170017 = PSwW FROM LOC. 6 WITH 
[PREVIOUS MODE BITS = USER 
57 024102 001402 5$ ;BRANCH IF YES 
58 024104 005267 $TMPO [WRONG PSW SAVED DURING ‘DOUBLE ERROR’ SEQUENCE 
59 026110 020327 : R3,43$+4 [WAS THE PC AT THE TIME OF THE ODD ADDR. ERROR 
760 :SAVED ON THE STACK? 
761 024114 6$ :BRANCH IF YES 
762 024116 26 $TMPO WRONG PC SAVED DURING TRAP SEQUENCE 
763 024122 020147 6$: WASSRO,#20147 :DID SRO REPORT - USER, PAGE 3, R/O ABORT? 
64 024130 7$ Ri YES 
$TMPO 5 NOT REPORT R/O ABORT 
024010 7$: WASSR2, #3$ “DID SR 5 LOCK UP VIRTUAL ADDR. OF LAST 
~ : INSTRUCTION SUCCESSFULLY FETCHED? 


$TMPO ;SR2 DID NOT LOCK UP ADDR. OF ODD ADDR. INST. 
$TMPO ZANY “ERRORS'' DURING TRAP SEQUENCE? 
9$ BRANCH IF NO 
+22 7; THE WRONG PC OR PSW WERE SAVED 
30R *~ OR SR2 DID NOT REPORT R/O 
;ERROR DUR ODD ADDR. - KT TRAP 
; SEQUENCE 


[FOR TIGHTER SCOPE LOOP 


1 
1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 
174 

1 

1 
17 
1 

1 

1 

1 
17 
1 

1 

1 

1 
1754 
1755 
1756 
4 

1 

1 

1 

1 

1 

1 
17 
1 

1 
176 
1 

1 

1 

1 
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PC & PSw SAVED FOR KT ERROR ON ODD AD SEQ 0045 
1777 +REPLACE, ERROR CALL WITH 
1778 2s" Ao. bay 
1779 024162 012737 002404 000004 9$: MOV ATIMERR ,@a4 ; RESTORE ADDRESS OF NORMAL CPU TRAP HANDLER 
1780 024170 012737 000340 000006 MOV #340 ,a%6 ;RELOAD ERRVEC+2 “ TH KERNEL PSW 
1781 024176 012737 002456 000250 MOV WMGMERR,@4250  ;RESTORE ADDRESS OF NORMAL M.M. TRAP HANDLER 
1782 024206 012767 077406 153374 MOV #77406,UIPDR3  ;REMAP USER PAGE 3 READ/WRITE 
1783 024212 012767 023704 154670 MOV #1$,$LPERR [RESET LOOP ON ERROR POINTER TO 1$ 
1784 024220 004767 156126 JSR PC,TON ; TURN T-BIT TRAPPING BACK ON 


CET he MEM MGMT PRT B MACRO M1111 — 12:24 PAGE B 
113 C & PSwW SAVED FOR KT ERROR ON ODD AD 


1 TT NS NS NA Ne NaF eNeF eNeF NaF Ne eNeL Nel eNeL Nel eNeLeNeFeVeF eel eX\e/e\ 
178 -SBTTL GROUP 6 hw. TESTS 

1788 TT NSN Ne NF NaF eNeF eNeFeNeF NaF No eNeL NaS aNeLeNeFeN\eFeNeLeNeSeN\eFe\ 
4 


805 —MmARAAAARARARARAALAAAAARLAARALALALELARARL ALA RASA LARA EASES ASSAD SS 


ATEST 14 ENABLE D-SPACE AND SEE THAT I=-SPACE IS FORCED 


THIS TEST SHOWS THAT I-SPACE IS FORCED DURING INSTRUCTION FETCHES 
AND ADDRESS, INDEX AND OPERAND FETCHES IF THE REGISTER FIELD IS 7. 


ALL ERRORS FOUND IN THIS TEST ARE REPORTED WHEN THE CPU 
ABORTS THRU ‘MMVEC'’ TO SUBROUTINE “NODSPAC’’. THIS SUB- 
ROUTINE WILL REPORT THAT D-SPACE WAS NOT ENABLED PROPERLY. 


NOTE - WHENEVER A DSTM=3,.6,7 IS SHOWN, AND THE OPERAND IS 
"100000", I-SPACE 1S FORCED IN THE OPERAND FETCH, 
BUT D-SPACE WILL BE FORCED ON THE ACCESS OF THE 
LOCATION; CORRECT OPERATION IS CHECKED. 


eee RARA AAA AAA RERERE EERE EERE RARER ERRERERRRER EERE EERE 
024224 714: SCOPE 

1 hae KERNAL I/D SPACE PAR'S AND PDR'S 

1807 024226 CLR MRO TURN OFF MEMORY MANAGEMENT 

io 024232 ZMAKE KERNAL D-SPACE PGS. 1.283 NON-RESIDENT 
1809 024236 7 [AND KERNAL I-SPACE PDR4 NON-RESIDENT 

ie? Bsesee 


woeeeeeeeneaenneae. 


a Re Se Be Be Be Be Be Be He Be Be Be He 


R 
146104 #600, KDPARG :MAP KDPAR4 TO 12=>16K 
153756 WNODSPAC MMVEC SET M.M. VECTOR TO D-SPACE SERVICE ROUT INE 
154610 #10$, $LPERR ;SET LOOP ON ERROR POINTER TO 10$ 
005267 MRO "TURN ON MEMORY MANAGEMENT 
012767 000024 146204 MOV #24 ,MAR3 SENABLE 22-BIT.KERNAL D-SPACE MAPPING 
TEST THAT INSTRUCTION FETCHES FORCE I-SPACE 


000400 4$ ; BRANCH 

000244 : :CLEAR ZERO BIT IN PSW 
001776 4$ NO BRANCH 

000264 : 7 SET — IN PSW 


001376 BNE 5$ : 
7 SET NEGATIVE BIT IN PSW 
;NO BRANCH 


000270 

100376 BP 6$ : 
TRY SOME SOP INSTRUCTIONS WITH SRCM=DSTM=0 
THESE SHOULD NEVER INVOKE D~SPACE 


1830 024330 005700 TST —RO 
1831 024332 005200 INC RO 
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T14 ENABLE D=SPACE AND SEE THAT I-SPACE IS FORCED SEQ 0047 


1833 024334 005300 DEC = RO 

1834 024336 006000 ROR —- RO 

1835 024340 006100 ROL RO 

1836 024342 005067 153224 CLR MARO F MEMORY MANAGEMENT 

1838 ;* TEST SOB NON-MOD WITH osteo 3° . 7; OSTF=7 

1839 024346 012737 100002 060000 Mov -#100002,@#60000 ;SET UP TEST LOCATION 

1840 024354 012767 024366 154526 MOV #11$,$LPERR ;SET LOOP ON ERROR POINTER TO 11$ 


1841 024362 005267 153204 INC MMRO ; TURN ON MEMORY MANAGEMENT 


74 
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T14 _- ENABLE D=SPACE SEE THAT I-SPACE 1S FORCED 


118: #60000 :DSTM=2 SOP NON-MOD 


100000 
@100000 OP _NON-MOD 
MEMORY MANAGEMENT 


CLR MRO ; TURN_OFF 
TEST SOB MOD WITH DSTM=2,3,6,7; DSTF=7 


154470 #12$ SLPERR :SET LOOP ON ERROR POINTER TO 12$ 
060002 #100000, a4#6000 ;SET UP TEST VALUES 
"TURN ON MEMORY MANAGEMENT 


MOD 
; TURN OFF MEMORY MANAGEMENT 


THE NEXT THREE TESTS ARE CONCERNED WITH TESTING 
DOP AND NOT (SRCM=DSTM=0) 


TEST DOP DEST NON-MOD SRCM=DSTM=2,3,6,7; SRCF=DSTF=7 


154424 #13$,$LPERR ;SET LOOP ON ERROR POINTER TO 13$ 
060002 #100000,a#60002 :SET UP TEST VALUE 
0 ;TURN ON MEMORY MANAGEMENT 

NON-MOD 


100000 : 

053260 100000,100000  ;SRCM=6 DSTM=6 DOP NON-MOD 

053254 @100002,a@100002 :SRCM=7 DSTM=7 DOP NON-MOD 
1871 024526 153040 CLR MMRO ‘TURN OFF MEMORY MANAGEMENT 
1872 : TEST MOV DEST AND NOT (SRCM=DSTM=0) 
1875 : SRCM=DSTM=2,3,6,7; SRCF=DSTF=7 


1874 
1875 024532 154350 #14$,$LPERR ;SET LOOP ON ar POINTER TO 14$ 
1876 024540 100000 060002 MOV #100000, a#60002 :SET UP TEST V. 
1877 024546 5267 MMR TORN ON MEMORY. 
1878 024552 060002 060002 : #60002,460002_: 
879 024560 060000 100000 #60000,a#100000 : 
053204 #60000,100000__: 
053200 #60000, 100002 
CLR MARO 
TEST DOP DEST MOD AND NOT SLB 
SRCM=DSTM=2,3.6,7; SRCF=DSTF=7 
024620 154274 #15$,$LPERR :SET LOOP ON ERROR POINTER TO 15$ 
MARO” : MEMORY GEMENT 


152752 
060000 060000 : #60000 . 460000 


MOV 
F MEMORY MANAGEMENT 


000000 100000 
000000 053136 
000000 053132 
152716 


CLR MAR F MEMORY MANAGEMENT 
TEST SWAB WITH DSTM=2,3, é, 7; DSTF=7 


1894 . 
1895 024654 154226 #16$,SLPERR :SET LOOP ON ERROR POINTER TO 16$ 
1896 024662 100002 060000 #1 #100002, @#60000 ;SET UP TEST VALUES 

1897 024670 STURN ON MEMORY Y MANAGEMENT 

1898 024674 060000 : 760000 DSTM=¢ $ 

1899 024700 a#100002 Ooms rr 


1892 024650 
1893 
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114 ENABLE D-SPACE AND 


8 025006 
1919 025012 
eer 025016 

1921 095029 
1922 025026 
1904 025032 


1925 
1926 025036 
1927 025044 
1928 025050 
a4 025054 

1930 025060 
1931 025064 
1932 025070 
1933 


1934 
1935 aces 
1936 102 


EERPRELELRE 

NOWUSWN—O 

SSSBssss 
MAMA 
st a 
SRRVRAE 


-eyrryyyrryryrtyrrtrr 
NM 
Ww 
«st 
N 
NM 


0000 
MOA 


z 


000367 
000377 
005067 


01 
012737 
267 


012767 


PRT 8 
SEE 
053072 
53064 
152652 


024740 
100000 
152632 
060000 


025012 
000001 


100000 
152560 
000001 


152522 
000002 


152476 
025114 
02 

000000 
052650 
152436 
025156 
100000 
152414 
060002 
100000 
052606 


052604 
152370 
024312 


MACRO M1111 


4 
25-SEP=79 12:24 PAGE Se-1 


THAT I=SPACE IS FORCED 


154162 
060002 


154116 
060000 
060002 


18$: 


154044 


154006 
060000 


153746 
060002 


28$: 


153700 


SWAB 100002 ;DSTM=6 SWAB 
;DSTM=7 


SWAB @100000 
CLR MMRO “TURN OFF MEMORY MANAGEMENT 
TEST ROT/SHFT WITH DSTM=2,3,6,7; DSTF=7 


#17$,SLPERR ;SET LOOP ON ERROR POINTER TO 17$ 


MOV #100000,a#60002 :SET UP TEST VALUES 

INC MRO STURN ON MEMORY MANAGEMENT 
ROL #60000 ‘DSTM=2 ROT/SHFT 

ROL a#100000 :DSTM= ROT/SHF T 

ROL 100000 DSTM=6 ROT/SHFT 

ROL @100002 :DS Ih? ROT/SHF T 


CLR ope URN OFF MEMORY MANAGEMENT 
TEST ASH/ASHC WITH pst. 3,6.7: DSTF=7 


MOV #18$,$LPERR ;SET LOOP ON ERROR POINTER TO 18$ 
MOV #1,a#60000 ‘SET UP TEST VALUES 
MOV #100000, a#60002 
INC MRO ; TURN ON MEMORY MANAGEMENT 
ASH #1,RO M=2 ASH/ASHC 
ASH a#100000,R0 *DSTM=3 ASH/ASHC 
ASH 100000,R0 [DSTM=6 ASH/ASHC 
ASH @100002,R0 :DSTM=7 ASH/ASHC 
0 MEMORY MANAGEMENT 


CLR MAR ; TURN_OFF 

TEST MUL/DIV WITH DSTM=2,3,6,7; DSTF=7 

#19$,.SLPERR SET LOOP ON ERROR POINTER TO 19% 
MAR ; ON MEMORY MANAGEMENT 


INC 0 :T ME 

MUL #2,RO :DSTM=2 MUL/DIV 

MUL a#100000.RO ‘DSTM=3 MUL/DIV 

MUL RO [DSTM=6 MUL/DIV 

MUL @100002,R0 *DSTM=7 MUL /DIV 

CLR :T F MEMORY MANAGEMENT 
TEST JMP WITH DSTM=3,6,7: DSTF=7 

MOV #20$,$LPERR :SET LOOP ON ERROR POINTER TO 20S 
MOV #23$,a#60000 ;SET UP TEST VALUES 

INC MRO ‘TURN ON MEMORY MANAGEMENT 
JMP av21$ “DSTM=3 J 

MP 22$ *DSTM=6 JMP 

MP 4100000 :DSTM=? MP 


CLR MMRO TURN OFF MEMORY MANAGEMENT 
TEST SUB WITH DSTM=2,3.6.7; DSTF=7 


MOV #28$ , SLPERR 3SET LOOP ON ERROR POINTER TO 28$ 
CLR RO SET UP TEST VALUES 

MOV #100000 ,a#60002 

INC MMRO ; TURN ON MEMORY MANAGEMENT 

SUB RO,460002 sDSTM=2 SUB 

SUB RO,a4#100000 :DSTM=3 SUB 

SUB RO,1 :DSTM=6 SUB 

SUB RO,a100002 ;DSTM=7 SUB 

CLR MMARO ; TURN 


OFF MEMORY MANAGEMENT 
MOV #10$ ,$LPERR 7SET LOOP ON ERROR POINTER TO START OF TEST 


+ RRRRARRRERRERRE RRR REAR RR ERA ERE RRERERR RARER RRRR EERE RRR 


S*TEST 15 


ENABLE D-SPACE AND SEE I-SPACE IS NOT FORCED 


SEQ 0049 


oa ten 11/44 MEM MGMT PRT B MACRO M1111 25-SEP-79 12:24 PAGE bga3 
T15 ENABLE D-SPACE AND SEE I-SPACE IS NOT FURCED 


THIS TEST SHOWS THAT I=-SPACE IS NOT FORCED IF THE REGISTER FIELD 
IS NOT 7, BUT THE OTHER CONDITIONS ARE MET. 


nr ERRORS FOUND IN THIS TEST ARE REPORTED WHEN THE CPU ABORTS 
HROUGH "MMVEC’ TO SUBROUTINE ‘NODSPAC'. it SUBROUTINE WILL 
REPORT THAT D=SPACE WAS NOT ENABLED PROPERL 


MARABSAALALALLLALALELES EAL AL ESE ASSES ARERR RRR RRR RRR RAR ARR REAR A SD S 


15: 
#77406 ,RO 


mm: =e ee eee ee 


gh Be Be Be Be Be Be oe 


PDR3 
TEST SOP NON-MOD; DSTM=1, “' 3,5,7 
;SET UP CONSTANTS FOR TEST 


SET LOOP ON ERROR POINTER TO 1$ 


; TURN ON MEMORY MANAGEMENT 
NON-MOD 


OP NON-MOD 
MMRO ; TURN OFF MEMORY MANAGEMENT 
TEST SOP MOD; DSTM=1,2,3,5,7 


025370 153524 #2$,$LPERR ;SET LOOP ON ERROR POINTER TO 2$ 
152202 maRO TURN ON MEMORY MANAGEMENT 


“DSTM=5 SOP MOD 
:DSTM=7 SOP MOD 
CLR MMRO OFF MEMORY MANAGEMENT 
SF DOP DEST NON-MOD W with SRCM=1,2,3,5,7 AND DSTM=1,2,3,5,7 
ALL SOURCE MODES TO BE TESTED ARE TESTED HERE 


#3$ ,SLPERR :SET LOOP ON ERROR POINTER TO 3 
#32 ,Re SET UP ADDRESSES 60000-60064 FOR TEST 


000002 


060000 
, 5 152120 MMRO ; TURN ON MEMORY MANAGEMENT 
2012 025452 091010 : MP (RO), (RO) 7SRCM=1 DSTM=1 DOP DEST NON-MOD 
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ENABLE D=SPACE AND SEE I-SPACE IS NOT FORCED SEQ 0051 
2013 025454 021020 CMP (RO), (RO)+ ;SRCM=1 DSTM=2 DOP DEST NON-MOD 
2014 025456 021030 CMP (RO) .@(RO)+ ‘SRCM=1 DSTM=3 DOP DEST NON-MOD 
2015 021050 CMP (RO) ,a=(RO) :SRCM=1 DSTM=5 DOP DEST NON-MOD 
2016 025462 021070 000000 CMP (RO) ,@0(RO) [SRCM=1 DSTM=7 DOP DEST NON-MOD 
2017 025466 022010 CMP 0)+, (RO) + SRCM= 1 T NON-MOD 
2018 02 022020 CMP (RO) +, (RO) + SRCM=2 DSTM=2 DOP DEST NON-MOD 
2019 022030 CMP (RO)+,a(RO)+ SR TM= EST NON-MOD 
2020 025474 022050 CMP (RO)+.a=-(RO)  :SRCM=2 DSTM=5 DOP DEST 
2021 025476 022070 000000 CMP (RO)+.@0(RO)  :SR DSTM=7 DEST 
2022 025502 023010 CMP @(RO)+, (RO) *SRCM=3 DSTM=1 DOP DEST 
2023 025504 023020 CMP a(RO)+.(RO)+  :SR DEST NON-MOD 

24 CMP @(RO)+.a(RO)+ :SRCM=3 DSTM=3 DOP DEST NON-MOD 
2025 025510 023050 CMP @(RO)+.a-(RO)  :SRCM=3 DSTM=5 DOP DEST NON-MOD 
023070 000000 CMP @(RO)+,@0(RO)  :SRCM=3 DSTM=7 DOP DEST 
2027 025516 025010 CMP a@-(RO). (RO) :SRCM=5 DSTM=1 DEST 
2028 025520 025020 CMP @-(RO).(RO)+ § :SRCM=5 DSTM=2 DOP DEST NON-MOD 
2029 025522 025030 CMP @-(RO).@(RO)+  :SRCM=5 DS T NON-MOD 
2030 025524 025050 CMP a-( (RO)  ;SRCM=5 DS 
2031 025526 025070 000000 CMP @-(RO).@0(RO) :SRCM=5 DSTM=7 DOP DEST NON-MOD 
025532 027010 000000 CMP @0(RO). (RO) :SRCM=7 DSTM=1 DOP DEST NON-MOD 
2033 025536 027020 000000 CMP @0(RO);(RO)+ | :SRCM=7 DSTM=2 DOP DEST NON-MOD 
027030 000000 CMP @0(RO).a@(RO)+  :SRCM=7 DSTM=3 DEST 
2035 025546 027050 000000 CMP (RO);a@-(RO): DSTM=5 DOP DEST NON-MOD 
2036 025552 027070 000000 000000 CMP @0(RO).@0(RO)  :SRCM=7 DSTM=7 DOP DEST NON-MOD 
2037 025560 005067 152006 CLR MRO * TURN OFF MEMORY MANAGEMENT 
2038 * TEST DOP DEST MOD AND NOT SUB; DSTM=1,2,3,5.7 
3* 
2040 025564 005000 CLR RO :SET UP CONSTANTS FOR TEST 
2041 025566 012701 060000 MOV #60000,R1 
2042 025572 012767 025604 153310 MOV #4$,$LPERR ;SET LOOP ON ERROR POINTER TO 4$ 
2043 025600 005267 151766 INC mmrO STURN ON MEMORY MANAGEMENT 
050011 4$: BIS RO,(R1) , [DSTM=1 DOP DEST MOD 
050021 BIS RO. (R1)+ : DEST MOD 
2046 025610 050031 BIS RO.a(R1)+ :DSTM=3 DOP DEST MOD 
2047 025612 050051 BIS RO. a-(R1) [DSTM=5 DOP DEST MOD 
2048 025614 050071 000000 BIS RO. a0(R1) :DSTM=? DOP DEST MOD 
2049 025620 005067 151746 CLR MARO OFF MEMORY MANAGEMENT 
spay i* TEST MOV DEST AND worcsmb. ry BO) © DSTM=3,5,7 
** 
2052 025624 012701 060000 MOV #60000,R1 :SET UP CONSTANTS FOR TEST 
2053 025630 012737 060002 060000 MOV #60002, 
2054 025636 012767 025650 153244 MOV #5$,$LPERR zSET LOOP ON ERROR POINTER TO 5$ 
2055 025644 005267 151722 INC MRO STURN ON MEMORY MANAGEMENT 
2056 025650 010031 5$: MOV RO,a(R1)+ [DSTM=3 MOV DEST 
2057 025652 010051 MOV RO.a-(R1) [DSTM=5 MOV DEST 
2058 025654 010071 000000 MOV RO. a0(R1) “DSTM=7 MOV DEST 
2059 025660 005067 151706 CLR MRO TURN OFF MEMORY MANAGEMENT 
2060 i* TEST SWAB; DSTM=1,2,3.5. 5 
** 
2062 025664 012701 060000 MOV #60000,R1 ;SET UP CONSTANTS FOR TEST 
2063 025670 012767 025702 153212 MOV #6$,SLPERR SSET LOOP ON ERROR POINTER TO 6$ 
2064 025676 005267 151670 INC mr6 ‘TURN ON MEMORY MANAGEMENT 
2065 025702 000311 6$ SWAB —s- (R21) “DSTM=1 SWAB 
2066 025704 000321 SWAB ss (R11) + *DSTM=2 SWAB 
2067 025706 000331 SWAB ss @(R1) + “DSTM=3 SWAB 
2068 025710 000351 SWAB = (R11) *DSTM=5 SWAB 
2069 025712 000371 000000 SWAB — @0(R1) “DSTM=? SWAB 


Nata 11/44 MEM MGMT PRT B MACRO M1111 (25-SEP-79 12:24 PAGE pw 
T15 ENABLE D-SPACE AND SEE I-SPACE IS NOT FORCED 


g yRY OFF MEMORY MANAGEMENT 


2070 025716 151650 
2071 


CLR MMRO 
TEST ROT/SHFT; DSTM=1,2,3,5 


207. : 
Bye 925722 012701 060000 MOV #60000,R1 ;SET UP CONSTANTS FOR TEST 
2074 0257, 060006 #60006 00 *R2 

060000 060000 2460000 

060002 #60002, #60002 

060004 060004 MOV #60004 , a#60004 

960006 #60006, 2460006 

025776 47S SLPERR :SET LOOP ON ERROR POINTER TO 7$ 


151574 MAR TURN ON MEMORY MANAGEMENT 
: ROL [DSTM=1 ROT/SHFT 


000000 :DSTM=7 ROT/SHF T 
151554 CLR MMRO ; TURN OF* MEMORY MANAGEMENT 
: TEST MUL/DIV; DSTM=1,2,3,5,7 


026032 MOV #8$ ,SLPERR :SET LOOP ON ERROR POINTER TO 8$ 
CLR R3 SET UP CONSTANT FOR TEST 
151540 INC ME GE 


@0(RO) .R3 
CLR MMRO 
TEST ASH/ASHC; DSTM=1,2,3,5 


060000 #1,2a460000 ;SET UP CONSTANTS FOR THE TEST 
060002 #60000, a#60002 


026066 0127 #60000, RO 
2104 026072 153010 #9$,$LPERR :SET LOOP ON ERROR POINTER TO 9$ 
2105 026100 005267 mer0 STURN ON MEMORY MANAGEMENT 
2106 026104 : c 
2107 026106 


5 TURN arr MEMORY MANAGEMENT 


nm 
— 
33) 
° 
& 
= 
° 


@0(RO) .R3 
CLR MMR 
TEST JMP; DSTM=3,7 


026156 152756 #10$,$LPERR :SET LOOP ON ERROR POINTER TO 10$ 
026160 060000 #11$.a#60000 :SET UP CONSTANTS FOR THE TEST 
026164 060002 #12$.a#60002 
#60000,R1 
151414 MMRO ; TURN ON MEMORY MANAGEMENT 
: a(R1)+ *DSTM=3 JP 
000000 : a0(R1) “DSTM=7 J 
151402 > CLR MMRO + TURN OFF MEMORY MANAGEMENT 
: TEST JSR; DSTM=3,7 


4 026170 67 026222 152712 MOV #13$,S$LPERR ;SET LOOP ON ERROR POINTER TO 13% 
5 026176 026224 060000 MOV #14$,a460000 SET UP CONSTANTS FOR THE TEST 
6 026204 026230 060002 MOV #15$,a#60002 


C 
TURN OFF MEMORY MANAGEMENT 


NINN NY @ OV OS 
WV SOBNANhWu=OS 


N 


eh a ed ca et ch ae ch a ce ct ee ce ed ce eed ed 
N 


PONGMAN IN IN ININNNoNongMononononory 


N 
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ENABLE D=SPACE AND SEE I-SPACE IS NOT FORCED SEQ 0053 
2127 026212 012701 060000 MOV #60000,R1 
2128 026216 905267 151350 INC MMR O : TURN ON MEMORY MANAGEMENT 
e129 22 0046731 13$: JSR PC,a(R1)+ ‘DSTM=3 JSR 
21 926224 004771 000000 14$: JSR PC. a0(R1) “DSTM=7 JSR 
2131 026230 005067 151336 15$: CLR MRO ;TURN OFF MEMORY MANAGEMENT 
2132 0 112767 000006 144044 MOVB #6, KIPDR3 MAKE KIPDR3 RESIDENT 
2133 026242 012706 001100 MOV #KERSTK,KSP “RESET STACK POINTER 
1% 026246 012767 025242 152634 MOV #20$,$LPERR :SET LOOP ON ERROR POINTER TO START OF TEST 
2144 LEAR ERE RE REERREREEERE ERE REREREREREEERRR EERE EERE 
S*TEST 16 PROPER ENABLING OF SUPER. D-SPACE 
** 
:* THIS TEST CHECKS FOR PROPER ENABLING OF THE SUPERVISOR D-SPACE. 
*“* 
* ANY ERRORS ENCOUNTERED WILL BE REPORTED THROUGH ‘MMVEC' TO 
ie SUBROUTINE ‘NODSPAC'. 
** 
rete tiiitititi tii titi iiiiitiiitititiitititiiitiitititiiiiiisy 
026254 000004 TST16: SCOPE 
2145 026256 105067 143740 20$:  CLRB = SDPDR1 :MAKE SDPDR1 NON-RESIDENT 
146 026262 012767 026310 152620 MOV #8. $LPERR :SET LOOP ON ERROR POINTER TO 1$ 
2147 026270 012767 000022 144220 MOV MAR TENABLE 22-BIT SUPERVISOR D-SPACE 
2148 026276 052767 040000 151472 BIS 425600" PSw ZENABLE SUPERVISOR MODE 
2149 026304 005267 151262 INC MEO TURN ON MEMORY MANAGEMENT 
2150 :* THE NEXT INSTRUCTIONS SHOULD NEVER INVOKE D-SPACE 
** 
2152 026310 000400 i$: BR 2$ 
2153 026312 005700 23: TST RO 
2154 026314 005200 INC RO 
2155 026316 005067 151250 CLR MARU ; TURN OFF MEMORY MANAGEMENT 
2156 026322 112767 000006 143672 MOVB  #6,SDPDR1 ‘MAKE SDPDR1 RESIDENT 
2157 026330 105067 143652 CLRB —s SIPDR3 [MAKE SIPDR3 NON-RESIDENT 
138 :* TEST SOP INSTRUCTIONS 
2160 026334 012767 026346 152546 MOV #3$,SLPERR :SET LOOP ON ERROR POINTER TO 3$ 
2161 026342 005267 151224 INC MRO ‘TURN ON MEMORY MANAGEMENT 
2162 026346 005737 060000 3$: TST a#60000 ‘OSIMES. DSTF=7 SOP NON-MOD 
2163 026352 005037 060000 CLR a#60000 *DSTM=3 DSTF=7 SOP MOD 
2164 026356 005067 151210 CLR MRO STURN OFF MEMORY MANAGEMENT 
3165 :* TEST DOP INSTUCTIONS 
** 
2167 026362 012767 026400 152520 MOV #4$,$LPERR :SET LOOP ON ERROR POINTER TO 4$ 
2168 026370 012700 060000 MOV #60000,RO ‘SET UP CONSTANT FOR TEST 
2169 026374 005267 151172 INC pap STURN ON MEMORY MANAGEMENT 
2170 026400 023710 060000 4$: CMP @#60000,(RO)  :SRCM=3 DSTM=1 DOP DEST NON-MOD 
2171 026404 052730 000000 BIS #0,a(RO)+ : SRC? DSTM=3 DOP DEST MOD 
2172 026410 013737 060002 060002 mov a#60002,a#60002 :SRCM=3 DSTM=3 MOV DEST 
2173 026416 005067 151150 CLR MRO * TURN OFF MEMORY MANAGEMENT 
Af i* TEST ROT/SHFT AND ASH/ASHC INSTRUCTIONS 
** 
2176 026422 012767 026446 152460 MOV #5$,$LPERR :SET LOOP ON ERROR POINTER TO 5$ 
2177 026430 012737 000001 060000 MOV #1460000 ‘SET CONSTANT FOR TEST 
2178 026436 012700 000001 MOV #1.RO ‘SET UP CONSTANT FOR TEST 
2179 026442 005267 151124 INC MRO * TURN oN MEMORY MANAGEMENT 
2180 026446 137 060000 5$: ROL a4#60000 ‘DSTM=3 ROT/SHFT 
2181 026452 072337 060000 ASH a#60000,R3 :DSTM=3 ASH/ASHC 


2182 026456 005067 151110 CLR MMRO ; TURN OFF MEMORY MANAGEMENT 
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R ENABLING OF SUPER. D-SPACE SEQ 0054 
sier s@ TEST MUL/DIV AND SWAB INSTRUCTIONS 
** 
2185 026462 012767 026474 152420 ° MOV #6$ ,SLPERR :SET LOOP ON ERROR POINTER TO 6$ 
2186 026470 005267 151076 INC mer d : TURN ON MEMORY MANAGEMENT 
2187 026474 070037 060000 6$: MUL a760000.R0 [DSTM=3 MUL/DIV 
2188 0 000337 060004 SWAB a#60004 [DSTM=3 SWAB 
2189 026504 005067 151062 CLR MRO ; TURN OFF MEMORY MANAGEMENT 
2190 026510 042767 000002 144000 BIC #2 .MPRS ;DISABLE SUPERVISOR Poe 
2191 026516 112767 000006 1ageo0 MOVB #6,SIPDR3 SMAKE SIPDR3 RESIDENT 
$i36 026524 012767 026256 152356 MOV #208, SLPERR ;SET LOOP ON ERROR POINTER TO START OF TEST 
$135 PL RRR RRR REE REE EERE EEE EEE 
seTEST 17 PROPER ENABLING OF USER D-SPACE 


* THIS TEST CHECKS FOR PROPER ENABLING OF THE USER D-SPACE. 
5* ANY ERRORS ENCOUNTERED WILL BE REPORTED THROUGH ‘MMVEC’ TO 
3* SUBROUTINE ‘NODSPAC'. 
** 
Peetitiitiiitiitti titi iii ii iti titi ittittitiiiiiite RRRKEEE 
026532 000004 TST17: SCOPE 
2203 026534 105067 151062 20$ CLRB UDPDR1 :MAKE UDPDR1 NON-RESIDENT 
2204 026540 012767 026566 152342 MOV #1$, —_ ;SET LOOP ON ERROR POINTER TO 1$ 
2205 026546 012767 000021 143742 MOV #23 + ENABLE 2-81! USER f-SPACE 
2206 026554 052767 140000 151214 BIS #140000, PSW sENABLE U R MODE 
2207 026562 005267 151004 INC TURN my PERORY MANAGEMENT 
2208 7* THE NEXT a mctios SHOULD NEVER INVOKE D-SPACE 
210 026 i$: BR 2$ 
2211 026570 005700 2$: TST RO 
2212 026572 005200 INC RO 
2213 026574 005067 150772 CLR MRO ; TURN OFF MEMORY MANAGEMENT 
2214 026600 112767 000006 151014 MOVB #6,UDPDR1 sMAKE UDPDR1 RESIDENT 
2215 026606 105067 150774 CLRB UIPDR3 ;MAKE UIPDR3 NON-RESIDENT 
$si$ ;* TEST SOP INSTRUCTIONS 
** 
2218 026612 012767 026624 152270 MOV #3$,$LPERR 2 SET LOOP ON ERROR Soa TO 3$ 
2219 026620 005267 150746 INC MRO "TURN ON MEMORY MANAGEMENT 
2220 026624 005737 060000 3$: TST a#60000 *DSTM=3 DSTF=7 SOP NON-MOD 
2221 026630 005037 060000 CLR a#60000 *DSTM=3 DSTF=7 SOP MOD 
2222 026634 005067 150732 CLR MRO [TURN OFF MEMORY MANAGEMENT 
$557 7* TEST DOP INSTUCTIONS 
*“* 
2225 026640 012767 026656 152242 MOV #4$,$LPERR :SET LOOP ON ERROR POINTER TO 4$ 
2226 026646 012700 060000 MOV #60000,RO ‘SET UP CONSTANT FOR TEST 
2227 026652 005267 150714 INC MARC [TURN ON MEMORY MANAGEMENT 
2228 026656 023710 060000 4$: CMP a#60000, (RO) :SRONS. DSTM=1 DOP DEST NON-MOD 
2229 026662 052730 000000 BIS #0,a(ROS+ “SRCM=2 DSTM=3 DOP DEST MOD 
2230 026666 013737 060002 060002 MOV a¥#60002 , a#60002 ;SRCM=3 DSTM=3 MOV DEST 
2231 026674 005067 150672 CLR MMR) TURN OFF MEMORY MANAGEMENT 
$536 i* TEST ROT/SHFT AND ASH/ASHC INSTRUCTIONS 
2234 026700 012767 026720 152202 MOV #5$,S$LPERR :SET LOOP ON ERROR POINTER TO 5$ 
2235 026706 012737 000001 060000 MOV #1, a#60000 :SET CONSTANT FOR TEST 
2236 026714 005267 150652 INC MMRO : TURN ON MEMORY MANAGEMENT 
2237 026720 006137 060000 5$: ROL 3460000 *DSTM=3 ROT/SHFT 


2238 026724 072337 060000 ASH 2760000 ,R3 :DSTM=3 ASH/ASHC 
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117 PROPER ENABLING OF USER D-SPACE SEQ 0055 


2239 026730 005067 150636 CLR MMRO TURN OFF MEMORY MANAGEMENT 
2240 ; TEST MUL/DIV AND SWAB INSTRUCT IONS 


2241 ;* 
2242 026734 012767 026752 152146 #6$,SLPERR :SET LOOP ON ERROR POINTER TO 6$ 
2243 026742 012700 000001 #1,R0 *SET UP CONSTANT FOR TEST 
2244 026746 150620 MRO [TURN ON MEMORY MANAGEMENT 
2245 026752 060000 a4#60000,R0 [DSTM=3 MUL/DIV 
75 060004 #60004 ;DSTM=3 SWAB 
150604 MRO “TURN OFF MEMORY MANAGEMENT 
000001 a MARS “DISABLE USER D-SPACE 
000006 UIPDR3 [MAKE UIPDR3 RESIDENT 
026534 A208. SLPERR *SET LOOP ON ERROR POINTER TO START OF TEST 
2251 027010 150762 *RESET TO KERNAL SPACE 


2261 LRA R ERE RR Ee 


s*TEST 20 TRAPPING IN D-SPACE KERNAL MODE 
-* 


THIS TEST VERIFIES THAT THE ABORT VECTOR IS TAKEN FROM 
D-SPACE AND NOT I-SPACE. THE I-SPACE VECTOR POINTS TO 
10$ AND THE D-SPACE VECTOR POINTS TO 15$. EACH PSW IN 
VIRTUAL 252 IS arte tae SO THE PROGRAM CAN TELL WHICH 
AREA IT IS PICKED UP FROM. 


'MmAAAAAAAAAASEASAAAELASALAALAAASAS ESAS AAA RELEASE ASAD SLEDS SD 


153274 PC, TOFF TURN OF T-BIT FOR THIS TEST 
: #1$,$LPERR 
#10$ , A4MMVEC 
EC+2 


: I 
#198, a#350 SSET D-SPACE M.M VECTOR TO 350 
340. a#352 [SET PSW PRIORITY TO 7 
1006 KSP ;SET UP KERNAL VECTOR 
TURN ON MEMORY MANAGEMENT 
pan MBORT IN KERNAL MODE WITH D-SPACE ENABLED 


077402 #77402 ,KDPDR4 caaP be D-SPACE PAGE 4 i READ ONLY 
000600 MAP D=-SPACE PAGE 4 TO 12K 


027014 


000001 
177777 


COMPARE 
BRANCH TO D-SPACE READ CODE 
+ SAVE PSW FOR ae E 
;REMAP KERNAL D PAGE 0 TO PHYSICAL 0 
MOV P ZRESET STACK POINTER AFTER D-SPACE ABORT 
143342 #B1T2 MARS ; TUPN OFF KERNAL D-SPACE ENABLE 
0,R1 ; COMPARE 


FOR COMPARE 
‘DID YOU PICK CORRECT PSW 
;BRANCH IF PSwW IS 34 
+33 WRONG PSW PICKED IN ABORT SEQUENCE 
020031 : MP #020031 ,R1 EXPECTING READ ONLY = 
;KERNAL MODE D-SPACE PAGE 4 
3$ BRANCH IF CONDITION IS CORRECT 
+27 WRONG M.M. ABORT CONDITION 
005067 150356 : MMRO CLEAR OFF MMRO FOR EXIT OF TEST 
2294 027214 012767 002456 151026 H#MGMERR,MMVEC ;RESTORE NORMAL M.M. TRAP VECTOR 





E 
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T20 TRAPPING IN D=SPACE  KERNAL MODE 


2295 027222 012767 000340 151022 MOV #340 ,MMVEC +2 RESTORE TRAP PSw (PRIORITY=7) 
$538 027230 012767 027022 151652 


MOV #20$,$LPERR ;SET LOOP ON ERROR POINTER TO START OF TEST 
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TRAPPING IN D=SPACE KERNAL MODE 


T20 


2346 
2347 027350 
2348 027352 
2349 
2350 
2351 
2352 027354 
2353 027354 
2354 027362 


152554 
000001 


000600 
036514 
100000 
027706 
143000 
027316 
010340 


001100 


000700 


027366 
036514 


MACRO M1111 


F 
25-SEP=79 12:24 PAGE 25 


ST aNeT Nol Nol g\oF Nol o\ole 


‘SBITL 


win 7 


> wef 


S7 eNeF oNe4 oNol ool ool o\ol 


oN eNSF NSN e7eN 
oNel Nol eNele Nes o\ 


WEAAAREBRARARRAAARLALSALLLZARSAAASERESESEASASS SARS RS ALE SERRA SARS A LS SS 


THIS GROUP OF TESTS WILL TEST ALL THE LOGIC ASSOCIATED WITH 
THE "MOVE FROM PREVIOUS'’ AND MOVE TO PREVIOUS'’ INSTRUCTIONS. 


° 
Pah 
te 
oe 
‘2 
e 


Wen AARERAAARRRRAASRRSALARARAASALILLELASESAAARAR AAR RA RR AAAS A SARE S SD S| 


—MARAAAAAAAAASAAAAALALAAAASASLASER RASA RARAAAR SARA ARRAS AR RAR ASSAD SS | 


STEST 21 


Be Be Be Be Be Be Be Be Be 
’- peepee HD 


150320 
143070 1$: 
142762 


150744 


151526 


PREVIOUS 


MOVE FROM PREVIOUS (SUPERVISOR) I-SPACE 
THIS TEST USES THE 


*MFPI® Piece TO ENSURE THAT THE 


MODE IS CLOCKED CORRECTLY 
THERE IS A DESCRIPTION BEFORE EACH DESTINATION MODE TESTED, 


IF THE CORRECT MODE (SUPERVISOR) IS NOT ENABLED A NON-RESIDENT ABORT 
WILL OCCUR AND TRAP TO 23$, WHERE THE ERRORS ARE REPORTED. 


CLRB KIPDR4 SMAKE 
: THE FOLLOWING WILL TEST DSTM=0 MFP 


MOV 


#5$,$LPERR 
#010340, PSwW 


SSP 

MKERSTK ,KSP 
7$ 
(KSP)+,RO 
MSUPSTK,R1 
ae 


8 
+23 


8$ 
+25 


936514, RO 


MASRARALARASALSALAALASZAAASAERSSSA SARE SARA RSA RARER SARA SARS S AS SSS | 


$121: 


: INIT ALL PAR/PDR'S 
; TURN 


;LOAD DATA PATTERN INTO RO 


;LOAD DATA PATTERN INTO PHY 60000 
SET M.M. VECTOR TO 23$ 
Pont I-SPACE PAGE 4 NON-RESIDENT 


SET LOOP ON ERROR POINTER a 5$ 

SMAKE PREVIOUS MODE SUPERVISOR 

PUT SUPERVISOR STACK POINTER . KERNEL STACK 
ING PUSHE STACK AT 6$ 


“EXPECTING TO GET 700 AS SSP 
:DID YOU GET THE RIGHT POINTER? 
[BRANCH IF YOU DID 

WRONG THING WAS PUSHED ON STACK 
FOR TIGHTER SCOPE LOOP 


SREPLACE ERROR CALL WITH 
;'BR 5$"' = 763 


;REPLACE ERROR CALL WITH 
;"BR 5$°* = 000761 
;THE FOLLOWING WILL TEST DSTM=1 MFPI. 
MOV #9$ ,SLPERR T LOOP 


1! ON ERROR POINTER TO 9$ 
SRELOAD DATA PATTERN IN RO 


SEQ 0057 





hte 11/44 MEM MGMT PRT B 
T21 MOVE FROM PREVIOUS (SUPERVISOR) I- 


150402 9%: 


2360 027406 
2361 027410 
2362 
2365 
2364 
2365 027412 


2373 027442 
2374 
2375 
2376 
2377 027444 


2384 027472 
2385 


2387 
2388 027474 


2396 027524 
2397 
2398 
2399 
2400 027526 
2401 


2402 
2403 027526 
2404 027534 


2410 027562 
2411 027564 


012767 





010340 
100000 


027420 
010340 
100000 


027452 
010340 
100000 


027502 
010340 
100002 


MACRO M1111 i’ =SEP=79 12:24 PAGE 35-7 


SPACE 


#010340,PSwW 
#100000 ,R2 
(R2) 
(KSP)+,R1 
RO,R1 

10$ 

+23 


; THE FOLLOWING pies TEST’ " DSTM=2 MFP. 
MOV #11$,$LPERR 


O1OSad Psu 
#100000.R2 
(R2)+ 
(KSP)+,R1 
0,R1 


010840, psu 
a#100000 
ea 


#17$,$LPERR 


#<$TMP242>, R2 


a-(R2) 
(KSP)+,R1 
RO,R1 


TOM PREVIOUS MODE SUPERVISOR 
;LOAD VIRTUAL ADDRESS INTO R2 
:READ FROM PHYSICAL 60000 

POP KERNEL STACK INTO R1 
WAS DATA FETCHED SAME AS STORED 
; BRANCH IF CORRECT aoe WAS FETCHED 


REPLACE ERROR _CALL WITH 
9$"* = 000766 


;SET LOOP ON ERROR POINTER TO 11$ 
MAKE PREV UPERVISOR 


IOUS MODE Vv 
;LOAD VIRTUAL ADDRESS INTO R2 
READ FROM PHYSICAL 60000 


:POP KERNEL STACK INTO R1 
WAS DATA FETCHED SAME AS STORED 
ae CH IF 


CORRECT DATA WAS FETCHED 
DATA WAS FETCHED 


; WRONG 
:FOR TIGHTER SCOPE LOOP 
: REPLACE ERROR CALL WITH 
;"BR 11$'' = 000766 
; THE ars ya TEST DSTM=3 MEPI. 
MOV #13$,$LPERR + 


RROR OS peietem 13$ 


SIC 
:POP KERNEL STACK INTO R1 
WAS DATA FETCHED SAME AS STORED 
:BRANCH IF gore BS WAS FETCHED 


PHYSI 
“POP KERNEL STACK INTO R1 
WAS DATA FETCHED SAME AS STORED 
BRANCH IF CORRECT DATA WAS FETCHED 
WRONG DATA WAS FETCHED 
FOR TIGHTER SCOPE LOOP 


;REPLACE ERROR CALL WITH 
;'BR 15$°" = 000766 


;THE FOLLOWING WILL TEST DSTM=5 MFPI. 
SET LOOP ON ERROR POINTER TO 17% 


MAKE PREVIOUS MODE SUPERVISOR 
;LOAD TEST LOC. VIRT. ADDR INTO LOC. 
‘hea ADDR. OF S$TMP2+2 INTO R2 
nny FROM PHYSICAL 66000 

POP KERNEL STACK INTO R1 
“WAS DATA FETCHED SAME AS STORED 
[BRANCH IF CORRECT DATA WAS FETCHED 


“WRONG DATA WAS FETCHED 


SEQ 0058 





3 
cE 


ad ad ed ad ead oh od ed 
3 CONAWUS wr 
Oo 
z 


246 
24 
24 
24 
24 
24 
24 
24 
24 


2432 027634 
2433 027642 
2434 027646 


2435 
2436 027652 
2437 027654 
2438 027656 
2439 027660 
2440 
2441 
2442 
2443 027662 
2444 027670 
2445 027676 


2446 027704 
2447 


2448 
2449 027706 


2454 027740 
2455 
2456 
2457 
2458 027742 
2459 027746 


2460 027752 
2461 


012767 


016746 
016746 
000002 


/44 MEM MGMT PRT B 
FROM PREVIOUS (SUPERVISOR) 


027574 
010340 


100000 


027626 
010340 
100000 


001202 
000000 


Tamales 12:24 PAGE 35-3 


;FOR Ale seman SCOPE LOOP 
:REPLA ctf - oret WITH 


: THE FOLLOWING WILL TEST peime6 SFP I 


#19$,SLPERR 
#010340, PSw 


#21$, SLPERR 
#010340, PSwW 


#100000; $TMP2 


#STMP2,R 
a0(R2) 


(KSP)+,R1 
RO,R1 
22$ 


AMGMERR , MMVE C 
#1$,$LPERR 
#6,KIPDRS 
TST22 


(KSP) +, TRAPPC 
SR2 .WASSR2 
#160000, SRO 


TRAPPS , = (KSP) 
TRAPPC ,=(KSP) 


;SET LOOP ON ERROR POINTER TO 19% 
;MAKE PREVIOUS MODE SUPERVISOR 
MAKE REGISTER 2 A ZERO 

;READ FROM PHYSICAL 60000 

;POP KERNEL STACK INTO R1 

;WAS DATA FETCHED SAME AS STORED 
;BRANCH IF CORRECT DATA WAS FETCHED 
WRONG DATA WAS FETCHED 

FOR TIGHTER SCOPE LOOP 

;REPLACE ERROR CALL WITH 

; = 000766 


:THE FOLLOWING WILL TEST DSTM=7 wrk. 


SET LOOP ON ERROR POINTER TO 21$ 


STL 
LOAD ADDRESS 
USE STMP2 TO FETCH VIRTUAL 
"ay SS OF 60000 


: E 
POP KERNEL STACK INTO R1 
‘WAS DATA FETCHED SAME AS STORED 
: BRANCH IF Bey 3 DATA was TETOes 
DATA WAS FETCHED 
:FOR TIGHTER SCOPE LOOP 
:REPLA cs, Fane CALL WITH 
:'BR 21$"' = 000762 
SET M.M. VECTOR TO NORMAL ROUTINE 
;SET LOOP POINTER TO START OF TEST 
SMAKE KIPDR4 RESIDENT 
> ; BRANCH TO NEXT TEST 


SAVE PC & PS OF TRAP 


;SAVE SRO FOR ERROR TYPEOUT 
: SAVE SR2 FOR ERROR TYPEOUT 
AR a. cent pide 


S L 
:REPLACE ERROR CALL WITH 
*noP’’ = 0002 
Pur PC e PS OF TRAP ON STACK 


SEQ 0059 





os 11/64 MEM MGMT PRT B MACRO M1111 25=SEP=79 12:26 PAGE 6 


FROM PREVIOUS (USER) I=SPACE SEQ 0060 
267% "SPOR aRRARSReaRaeRRaReeRaaReRaRaaeaenenaneaaanaae 
T*TEST 22 MOVE FROM PREVIOUS (USER) I-SPACE 
oe THIS TEST USES THE 'MFPI' INSTRUCTION TO ENSURE THAT THE 
* PREVIOUS MODE IS CLOCKED CORRECTLY 
te THERE IS A DESCRIPTION BEFORE EACH DESTINATION MODE TESTED, 
-* 
-* 
:* IF THE CORRECT MODE (USER) IS NOT ENABLED A NON-RESIDENT ABORT 
;* WILL OCCUR AND TRAP TO 23$, WHERE THE ERRORS ARE REPORTED. 
* 
POSSI SSIS it iii tii iiiiiiiiiiy) 
027754 000004 1S122: SCOPE 
2475 027756 012700 036514 1$: MOV #36514,R0 :LOAD DATA PATTERN INTO RO 
2476 027762 012767 000600 147660 MOV #600, UIPARG ;MAP UIPARS TO 12k 
2477 027770 010037 100000 MOV RO, a#100000 LOAD DATA PATTERN INTO PHY 60000 
2478 027774 012767 030404 150246 MOV #233 ,MMVEC :SET M.M. VECTOR TO 23$ 
2479 030002 105067 142302 CLRB —«KIPDR4 [MAKE KERNEL I-SPACE PAGE 4 NON-RESIDENT 
seat THE FOLLOWING WILL TEST DSTM=0 MFP] 
2482 030006 012767 030014 151074 MOV #5$,$LPERR :SET LOOP ON ERROR POINTER TO 5$ 
26483 030014 012767 030340 147754 S$: MOV #030340,PSw [MAKE PREVIOUS MODE USER 
2484 030022 006506 6$: MFPI USP [PUT USER STACK POINTER ON KERNEL STACK 


2485 030024 022706 001100 CMP MKERSTK ,KSP ;WAS SOMETHING PUSHEL ON STACK AT 6$ 


Cex TORO 11/44 MEM MGMT PRT B 
T22 MOVE 


MACRO M1111 


FROM PREVIOUS (USER) I-SPACE 


25-SEP=79 12:24 PAGE 27 


7$ 
(KSP)+,RO 
MUSESTK,R1 
RO,R1 

8$ 

+23 


;BRANCH IF NOTHING WAS PUSHED 
; POP 


AS USP 
DID YOU GET THE RIGHT POINTER? 
BRANCH IF YOU DID 
WRONG THING WAS PUSHED ON STACK 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 


SEQ 0061 


aa 11/44 MEM MGMT PRT B 


MACRO M1111 


MOVE FROM PREVIOUS (USER) I-SPACE 


6 000401 
as 030050 104025 


—-OCoOOoO 
& 
Ww 
—" 


0 

0 012767 030116 
6 012767 030340 
4 100000 


7$: 


8$: 
151030 


147704 9$: 


10$: 
147652 11$: 


150772 


kK § 
25=SEP=79 12:24 PAGE 28 


;'BR 5$"* = 000763 
BR 8$ BRANCH TO NEXT TRY 
ERROR +25 NOTHING PUSHED ON STACK 
FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
$** = 000761 


;THE FOLLOWING WILL TEST ‘DSTM=1 MFPI. 
#9$ SLPERR T LOOP 


MOV 

MOV 936514 RO 

MOV #030340, PSw 
#100000 


ON ERROR POINTER TO 9$ 
# RELOAD DATA PATTERN IN RO 
MAKE PREVIOUS MODE USER 


1 *R2 “LOAD V VIR TUAL ADDRESS INTO R2 
MFP] (R2) SREAD FROM PHYSICAL 60000 

(KSP)+,R1 [POP KERNEL STACK INTO R1 
C RO,R1 [WAS DATA FETCHED SAME AS STORED 
BEQ 10$ ‘BRANCH IF CORRECT DATA WAS FETCHED 
ERROR +23 ; DATA WAS FETCHED 


;REPLACE ERROR CALL WITH 
;"BR 9$"' — 


;THE FOLLOWING WILL TEST DSTM=2 MF 

Mov #11$,$LPERR :SET LOOP ON’ ERROR POINTER TO 11S 
MOV #030340,.PSW ;MAKE PREVIOUS MODE USER 

MOV —- #100000:R2 [LOAD VIRTUAL ADDRESS INTO R2 


SEQ 0062 


CKKTBAO 11/44 MEM MGMT PR MACRO M1111 25=SEP=79 12:24 PAGE 
T22 MOVE FROM PREVIOUS CuseR) 1=SPACE 


2520 030130 006522 (R2)+ ;READ FROM PHYSICAL 60000 
012601 (KSP)+,R1 :POP KERNEL STACK INTO R1 
020001 0,R1 [WAS DATA FETCHED SAME AS STORED 
001401 2 ;BRANCH IF CORRECT DATA WAS FETCHED 
2524 030140 104023 WRONG DATA WAS FETCHED 
2525 [FOR TIGHTER SCOPE LOOP 
2526 :REPLACE, ERROR CALL WITH 
= 000766 


2527 

2528 030142 12$: ; THE mre fh pi TEST "DSTM=3 MFPI. 

2529 030142 012767 030150 150740 MOV #13$ ERR SET LOOP ON ERROR POINTER TO 13$ 
2530 030150 012767 030340 147620 138: MOV 7030820, Pow s:MAKE PREVIOUS MODE USER 





CKKTBAO 11/44 MEM MGMT PRT B MACRO M1111 25=SEP=79 12:24 PAGE 30 
T22 MOVE FROM PREVIOUS (USER) I-SPACE 


006537 100000 a#100000 ;READ FROM PHYSICAL 60000 
012601 ;POP KERNEL STACK INTO R1 
020001 R1 WAS DATA FETCHED SAME AS STORED 
001401 BEQ BRANCH IF CORRECT DATA WAS FETCHED 
104023 WRONG DATA WAS FETCHED 

FOR TIGHTER SCOPE LOOP 

:REPLACE ERROR CALL WITH 

1 = 000767 


2539 
2540 030172 : ;THE FOLLOWING WILL TEST * DSTM=4 MFPI. 





11/44 MEM MGMT PR MACRO M1111 25=SEP=79 12:24 PAGE 31 
FROM PREVIOUS (USER) 1-SPACE 


30172 030 150710 #15$,S$LPERR :SET LOOP ON ERROR POINTER TO 15$ 
200 030340 147570 158: #030840, PSw ;MAKE PREVIOUS MOD: 

702 100002 #100002.R2 VIRTUAL ADDRESS INTO R2 
=(R2) RE SICAL 60000 


(KSP)+,R1 : 
RO,R1 3 S 
16$ ;BRANCH IF CORRECT DATA WAS FETCHED 


ooo°oo 
S 


+23 WRONG DATA WAS FETCHED 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
;'BR 158°" = 000766 


i THE FOLLOWING WILL TEST DSTM=5 MFPI. 


MOV #17$,$LPERR ;SET LOOP ON ERROR POINTER TO 17$ 
2557 030232 7 17$: MOV #030340,PSwW [MAKE PREVIOUS MODE USER 





CKKTBAO 11/44 MEM MGMT PRT B MACRO M1111 25-SEP-79 12:24 PAGE 32 
T22 MOVE FROM PREVIOUS (USER): I-SPACE SEQ 0066 


2559 030240 012767 100000 150734 MOV #100000,$TMP2 ;LOAD TEST LOC. VIRT. ADDR INTO LOC. STMP2 





. @ 
CKKTBAO 11/44 MEM MGMT PRT B MACRO M1111 25=SEP=79 12:24 PAGE 33 
T22 MOVE FROM PREVIOUS (USER) I-SPACE SEQ 0067 


2561 030246 012702 001204 MOV #<$TMP2+2>,R2 sD ADDR. OF $TMP2+*2 INTO R2 
2562 030252 006552 MFP] a-(R2) ; READ FROM PHYSICAL 60000 
2563 030254 012601 MOV (KSP)+,R1 POP KERNEL STACK INTO RI 





CKKTBAO 11/44 MEM MGMT PRT B 
T22 MOVE FROM PREVIOUS (USER) 


2565 030256 
2566 030260 
2567 030262 
2568 
2569 
2570 
2571 030264 
2572 
2573 030264 


2580 030314 
2581 
2582 
2583 
2584 030316 
2585 
2586 030316 
2587 030324 
2588 030332 


2613 
2614 030440 


2615 030444 
2616 030450 


030272 
030340 


100000 


030324 150564 
030340 147444 
100000 150642 
001202 
000000 


MACRO M1111 
I=SPACE 


D 6 
25=SEP=79 12:24 PAGE 34 


#19$,$LPERR 
#930340, PSw 


100000 (R2) 


#21$,$LPERR 


#030340,PSwW 
0000. $TMP2 


aa 


2 


+23 


AMGMERR , MMVE C 
#1$,$LPERR 
#6,KIPDR4 
TST23 


(KSP) +, TRAPPC 
(KSP) +, TRAPPS 
SRO, WASSRO 
SR2,WASSR2 
#166000, SRO 


TRAPPS ,~(KSP) 
TRAPPC ,=(KSP) 


WAS DATA FETCHED SAME AS STORED 
BRANCH IF CORRECT DATA WAS FETCHED 
WRONG DATA WAS FETCHED 

FOR TIGHTER SCOPE LOOP 

SREPLACE. ERROR OnOveR WITH 


+ THE FOLLOWING WILL TEST DSTM=6 MFPI. 


SET LOOP ON ERROR POINTER TO 19% 
;MAKE PREVIOUS MODE USER 
[MAKE pte ‘ A ZERO 


STOR 
;BRANCH IF CORRECT DATA WAS FETCHED 
WRONG DATA WAS FETCHED 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
a” 19$'' = 000766 


:THE FOLLOWING WILL TEST DSTM=7 MFPI. 


SET LOOP ON ERROR POINTER TO 21$ 
;MAKE PREVIOUS MODE USER 
LOAD TEST LOC. V.A. INTO STMP2 
[LOAD ADDRESS OF $TMP2 INTO R2 
USE STMP2 TO FETCH VIRTUAL 

ae uae OF 60000 


[POP KERNEL STACK INTO R 
“WAS DATA FETCHED SAME AS STORED 
‘BRANCH IF CORRECT DATA WAS FETCHED 


REPLACE, ERROR CALL WITH 
:'BR 218" = 000762 
iSET M.M. VECTOR TO NORMAL ROUTINE 
T LOOP POINTER TO START OF TEST 
“MAKE KIPDR4 RESIDENT 
7 ;BRANCH TO NEXT TEST 


SAVE PC «s rS OF TRAP 


;SAVE SRO FOR ERROR TYPEOUT 
2 SAVE SR2 FOR we TYPEOUT 

S_IN er AND LEAVE 
DENT PAGE 


iF GHTER SCOPE L 

: REPLACE ERROR CALL WITH 

7A ‘NOP"’ = 000240 

PUT PC & PS OF TRAP ON STACK 





CKKTBAO 11/44 MEM MGMT PRT B MACRO M1111 25=SEP=79 12: - PAGE 5s ° 
T22 MOVE FROM PREVIOUS (USER) I-SPACE 


J FUERA AAA AAARAAARERAEREEERERERERERERARRRREREARRRERERERERREEEEEE 


seTest 23 MOVE TO PREVIOUS(SUPERVISOR) I-SPACE 


THIS TEST USES THE ‘MTPI’ ore TO ENSURE THAT THE 
PREVIOUS MODE IS CLOCKED CORRECTL 
THERE IS A DESCRIPTION BEFORE EACH DESTINATION MODE TESTED, 


ur: eae nep ee eeee 


IF THE CORRECT MODE IS NOT ENABLED A NON-RESIDENT ABORT 
WILL OCCUR AND TRAP TO 20%, WHERE THE ERRORS ARE REPORTED. 


ETT ITI Citi iii titi i iit iii iii iiiiiiiiiiitiiiiiiiiiiii i) 
000004 niet SCOPE 

012767 077406 141526 MOV #77406,SIPDR4 ;SUPERVISOR I-SPACE PAGE 4 READ/WRITE 
012767 031242 147560 MOV #20$ .MMVEC 7SET M.M. VECTOR TO 208 

; THE FOLLOWING WILL TEST DSTM=0 MTPI 


012767 010340 147300 : #010340 ,PSwW MAKE PREVIOUS MODE SUPERVISOR 
007777 #7777 ,~(KSP) PUSH DATA ON KERNEL STACK 
SSP ;LOAD SUPERVISOR STACK POINTER 
SSP READ SUPERVISOR ga POINTER 
(KSP)+,R1 POP KERNEL STACK INTO R1 
007777 Gh WAS we it STACK POINTER CHANGE D 


E 3 [BRANCH T WAS 
2643 030516 +25 SUPERVISOR STACK POINTER NOT CHANGED 
2644 :FOR TIGHTER SCOPE LOOP 
2645 PEACE € ERROR CALL WITH 


2646 3 
2647 030520 012767 010340 147250 : #010340,PSW MAKE PREVIOUS MODE SUPERVISOR 
012746 000700 MOV MSUPSTK, = (KSP) :GET READY TO RESTORE SUPERVISOR S. POINT 
006606 SSP ;RESTORE SUPERVISOR STACK POINTER 
: ;THIS WILL TEST DSTM = 1 MTPI. 
012767 On0 338 150346 MOV roy SLPERR ; OOP ON ERROR POINTER TO 5$ 


Re 
125252 #125252,R0 RO 
010046 : P pee TEST DATA ON KERNEL STACK 

2655 030554 141530 MAKE KERNEL I PAGE 4 NON-RESIDENT 
2656 030560 006612 ;LOAD TEST DATA INTO app shy 60000 
2657 030562 000006 141520 MAKE KERNEL PAGE 4 RESIDENT 
2658 030570 (R2) ,R1 TREAD FROM ADDRESS 60000 
2659 030572 020001 +SEE IF DATA_WAS STORED AT CORRECT PLACE 
2660 030574 $ CORRECT 
2661 030576 
2662 


a ee ed 


Nm 
w 


iF GHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
;"BR 5$°' = 000765 
;THE FOLLOWING WILL TEST DSTM=2 MIPI. 
#8$ ,SLPERR ;SET LOOP ON ERROR POINTER TO &$% 
; UPERV1SOR 


#010340, PSwW EVIOU 
“LOAD TEST DATA INTO R 
[LOAD VIRTUAL ADDRESS INTO R2 
“PUSH TEST DATA ON KERNEL STACK 
141456 [MAKE KERNEL PAGE 4 NON-RESIDENT 
2673 030632 “LOAD TEST DATA INTO PHYSICAL 60000 








F_ 6 
OE ee 11/44 MEM MGMT PRT B MACRO M1111 25=SEP=79 12:24 PAGE 35-1 
123 MOVE TO PREVIOUS(SUPERVISOR) I-SPACE 


2674 030634 112767 000006 141446 KIPDR4 :MAKE KERNEL PAGE 4 RESISENT 
013701 100000 341190000, R1 [READ FROM ADDRESS 60000 
020001 RO,R ;SEE IF DATA WAS STORED CORRECTLY 
% C CORRECT 
+ 


OPE LOOP 
{REPLACE ERROR CALL WITH 
;"BR 8$"* = 000764 


;THIS WILL TEST DSTM = 3° MTPI. 

030674 MOV #10$,$LPERR SET LOOP ON ERROR POINTER TO 10$ 
010340 #010340, PSW ;MAKE PREVIOUS MODE SUPERVISOR 
052525 #52525 ,RO ;LOAD TEST DATA INTO RO 

: ‘PUSH TEST DATA A. KERNEL STACK 
141406 ;MAKE KERNEL I PAGE 4 NON-RESIDENT 
100000 a4#100000 ;LOAD TEST DATA INTO PHYSICAL 60000 
; RNE GE 4 RESIDENT 


DRESS 60000 
E IF DATA WAS STORED CORRECTLY 
“BRANCH IF Ah WAS CORRECT 


2693 030724 

269% OPE LOOP 

2695 ; REPLACE ERROR CALL WITH 
10$"* = 000763 


2696 

2697 030726 2 ;THIS WILL_TEST DSTM = 4° TPL. 

2698 03072 030746 150154 MOV 12$,$LPERR ae ‘OOP via ERROR POINTER TO 12$ 
910383 147034 #01 


100002 
141330 7 MAK A 
) ;LOAD TEST DATA INTO PHYSICAL 60000 
000006 141320 SMAKE KERNEL PAGE 4 RESIDENT 
100000 [READ FROM ADDRESS 60000 
RO,R1 :SEE IF DATA WAS STORED CORRECTLY 

BRANCH IF STORE WAS CORRECT 

: INCORRECT STORE 

[FOR TIGHTER SCOPE LOOP 

REPLACE ERROR CALL WITH 

: $** = 000762 


2712 ; 
sil? 031002 : 3 THE FOLLOWING WILL TEST DSTM=5 MTPI. 


2715 031002 0100 #14$,$LPERR ;SET LOOP ON ERROR POINTER TO 14$ 
#010340, PSw MAKE PREVIOUS MODE SUPERVISOR 
25,.RO ‘LOAD TEST DATA INTO RO 
SLOAD ADDR. OF LOC. $TMP2+2 INTO R2 
‘LOAD VIRT. ADDR. OF TEST LOC. INTO STMP2 
eae ;PUSH TEST DATA ON KERNEL STACK 


2 
000006 #006, KIPDR4 “MAKE KERNEL PAGE 4 RESIDENT 
100000 a#100000,R i [READ FROM ADDRESS 60000 

7 SEE IF DATA WAS gy A 


2726 031 
2727 031062 
2728 ; SCOPE LOOP 
2729 : REPLACE ERROR CALL WITH 
2730 :"BR 14$°* = 000764 








CKKTBAO 11/44 MEM MGMT PRT B MACRO M1111 25=SEP=79 12:24 PAGE $58 
123 MOVE TO PREVIOUS(SUPERVISOR) I-SPACE SEQ 0071 


ore 031064 15$: THIS WILL TEST DSTM = 6 MTPI. 


2733 031064 012767 150016 : #16$, S$LPERR :SET LOOP ON ERROR POINTER TO 16$ 
2734 031072 146676 #010340,PSw S 
2735 #52525, RO 


STACK 


KERNEL I PAGE 
#LOAD TEST DATA INTO PHYSICAL 60000 
141162 MAKE KERNEL PAGE 4 RESIDENT 
TREAD FROM ADDRESS 60000 
SEE IF DATA WAS STORED CORRECTLY 
BRANCH IF STORE WAS CORRECT 


folololololo) 
NIN NUN AIAN 
et el elt elt el el el el 
— ts os so oe J 
—_ 
FENRSRSKRS 


;REPLACE, ERROR CALL WITH 
2747 = 000763 
oy: 031140 : ;THE FOLLOWING WILL TEST " DSTM=? MTPI. 


2750 031140 012767 147742 #18$ ,SLPERR SET LOOP ON ERROR POINTER TO 18% 
012767 010340 146622 #010340,PSw ;MAKE PREVIOUS MODE SUPERVISOR 
012700 Af estes RO ; TEST DATA INTO RO 
2753 031160 012767 100000 150014 #100000.$TMP2 LOAD VIRT. ADDR. OF TEST LOCATION 
2754 ; LOCATION STMP2 
2755 031166 012702 #STMP2 ,R2 ;LOAD ADDRESS OF STMP2 INTO R2 
010046 ;PUSH TEST DATA ON KERNEL STACK 
KERNEL PAGE 4 NON-RESIDENT 
eL TEST e INTO ep h a he 60000 
141076 ;MAKE KERNEL PAGE 4 RESIDENT 
1 1 ;READ FROM ADDRESS 60000 
SEE IF DATA WAS STORED CORRECTLY 
BRANCH IF STORE WAS CORRECT 
2763 031222 E 
2764 


2765 :REPLACE, ERROR CALL WITH 

2766 :'BR 18$'" = 000763 

2767 031224 147656 198: #1, SLPERR ZSET LOOP POINTER TO START OF TEST 
2768 031232 147010 WMGMERR MMVEC  :RESTORE M.M. VECTOR TO NORMAL ROUTINE 
2769 031240 0004 TST24 ; BRANCH TO NEXT TEST 


2771 
2772 031242 : (KSP)+,TRAPPC ;SAVE PC & PS OF TRAP 


SAVE SRO FOR ERROR TYPEOUT 

MOV SAVE SR2 FOR ERROR TYPEOUT 
146276 IC CLEAR ERROR BITS IN SRO 

2777 031274 24 ; TRIED TO LOAD AN.R. PAGE 4 
2778 :FOR TIGHTER SCOPE LOOP 
2779 :REPLACE, E ERROR a WITH 


2780 000240 

2781 031276 016746 MOV TRAPPS,-(KSP) :PUT PC & PS OF TRAP ON STACK 
2782 031302 016746 TRAPPC ,=(KSP) 

2783 031306 000002 ;RETURN TO TEST 





H 6 
eae 11/44 MEM MGMT PRT B MACRO M1111 25=SEP=79 12:24 PAGE 36 
124 MOVE TO PREVIOUS (USER) I=SPACE SEQ 0072 


2785 SRAEARERRAAERREEEARAEEREEREERAAREEEAAREEERRERERERERRERE REE RE 


:STEST 24 MOVE TO PREVIOUS (USER) I=SPACE 


THIS TEST USES THE ‘MTPI* INSTRUCTION TO ENSURE THAT THE 
PREVIOUS MODE IS CLOCKED CORRECTLY 
THERE IS A DESCRIPTION BEFORE EACH DESTINATION MODE TESTED, 


IF THE CORRECT MODE IS NOT ENABLED A NON-RESIDENT ABORT 
WILL OCCUR AND TRAP TO 20$, WHERE THE ERRORS ARE REPORTED. 


eT T TTT iii iti titi iit iii i iii iii ii iiti iii ii iii iii iii iii 
031310 000004 — SCOPE 

2786 031312 146270 MOV AN ype oN ;USER I-SPACE PAGE 4 & hee 
2787 031320 000600 146322 - MOV #600 ,UIPA [MAP U = I PAGE 4 TO 12k 

2788 031326 146714 MOV #20$ .MMV Move SET M.M. VECTOR TO 20$ 

2789 ; THE FOLLOWING WILL TEST DSTM=0 MTP] 


2790 

2791 031334 146434 : #030340,PSW MAKE PREVIOUS MODE USER 
#7777 ,~(KSP) PUSH DATA ON KERNEL STACK 
USP ;LOAD USER STACK POINTER 
USP sREAD USER STACK POINTER 
(KSP)+,R1 ;POP KERNEL STACK INTO R1 
#7777,R1 [WAS USER STACK POINTER CHANGED 
3$ BRANCH IF IT WAS 
+25 USER STACK POINTER NOT CHANGED 

;FOR TIGHTER SCOPE LOOP 


;REPLACE ERROR CALL WITH 
;"BR 2$°* = 000764 


012767 030340 146404 : #030340,PSW MAKE PREVIOUS MODE USER 

012746 000600 MOV MUSESTK,-(KSP) ;GET READY TO RESTORE USER S. POINT 
006606 I USP : RESTORE USER STACK POINTER 

i wert By Bs = 1 MTPI. 


012767 031416 147502 SET LOOP ON ERROR POINTER TO 5$ 
100000 7100000. R2 ;LOAD VIRTUAL ADDRESS INTO R2 
125252 #125252,R0 [LOAD TEST DATA INTO RO 
: RO, -(KSP) ;PUSH TEST DATA a. KERNEL 
140664 CLRB MAKE KERNEL I PAGE 4 NON-RESIDENT 
(R2) ;LOAD TEST DATA INTO PHYSICAL 60000 
000006 MAKE KERNEL PAGE 4 RESIDENT 
R2) ,R1 TREAD FROM ADDRESS 60000 
7 SEE IF iP aT WAS hg PLACE 


eur: one see ese: 


ee ee ee ee ee 


2816 031442 

2817 ‘ 

2818 ;REPLACE ERROR CALL WITH 
2819 000765 

2820 051444 ;THE FOLLOWING WILL TEST’DSTM=2 MTPI. 


2822 031444 031470 147436 #8$,$LPERR :SET LOOP ON ERROR POINTER TO 8$ 

030340 146316 #030340,PSwW {MAKE PREVIOUS MODE USER 

125252 #125252,R0 : LOAD TEST DATA INTO RO 

100000 00000; R2 “LOAD VIRTUAL ADDRESS INTO R2 

: ‘BUSH TEST DATA ON KERNEL STACK 
140612 CLRB PORG ‘MAKE KERNEL PAGE 4 NON-RESIDE 
(R2) ;LOAD TEST DATA pre PHYSICAL $0000 

2829 031500 000006 #006 ,KIPDR4 “MAKE KERNEL PAGE 4 RESISENT 








6 
CKKTBAO 11/44 MEM MGMT PRT B MACRO M1111 25=SEP=79 12:24 PAGE $6~) 
T24 MOVE TO PREVIOUS (USER) I-SPACE SEQ 0073 


013701 100000 a@4100000,R1 ;READ FROM ADDRESS 60000 
020001 RO,R1 SEE IF DATA WAS STORED CORRECTLY 
BRANCH IF STORE WAS CORRECT 
+24 : INCORRECT STORE 
SFOR TIGHTER SCOPE LOOP 
; REPLACE ERROR CALL WITH 
8$"' = 000764 


9$: ;THIS WILL TEST DSTM = 3 MTPI. 
031540 147362 MOV 10$,$LPERR ;SET LOOP ON ERROR POINTER TO 108 
o20250 146242 #0 538 RO ;MAKE PREVIOUS MODE USER 


140542 [MAKE KERNEL I PAGE 
100000 ‘LOAD TEST DATA INTO PHYSICAL 60000 
000006 140530 #006 .KIPDR4 “MAKE KERNEL PAGE 4 RESIDENT 
100000 a#100000,R1 [READ FROM ADDRESS 60000 
RO,R1 [SEE IF DATA WAS STORED CORRECTLY 
11$ SBRANCH IF STORE WAS CORRECT 
+24 S INCORRECT STORE 
[FOR TIGHTER SCOPE LOOP 
TREPLACE ERROR CALL WITH 
‘BR 10$'" = 000763 
: :THIS WILL TEST DSTM = 4 MTPI. 
031612 147310 MOV #12$, SLPERR 
030340 146170 #030340,PSwW é 
125252 #125252.RO ‘LOAD TEST DATA INTO UO” 
atte : ;PUSH TEST DATA ON KERNEL STACK 


140464 “MAKE KERNEL I PAGE 4 
2 ;LOAD TEST DATA INTO PHYSICAL 60000 
000006 140454 SMAKE KERNEL PAGE 4 RESIDENT 
100000 READ FROM ADDRESS 60000 
7 SEE i "se WAS STORED CORRECTLY 
‘BRANCH WAS CORRECT 


sREPLACE ERROR CALL WITH 
:'BR 12$'" = 000762 
3 THE FOLLOWING WILL TEST DSTM=5 MTPI. 


147234 #14$,S$LPERR :SET LOOP ON ERROR POINTER TO 14% 
146114 #030340,PSW ‘MAKE PREVIOUS MODE USER 
525 RO ‘LOAD TEST DATA INTO R 

;LOAD ADDR. OF LOC. STHP2+2 R2 

147302 00000,$TMP2 LOAD VIRT. ADDR. OF TES fot. “Into $TMP2 
: ;PUSH TEST DATA ON KERNEL. § 
MAKE KERNEL PAGE 4 NONCRES IDENT 

“LOAD TEST DATA INTO PHYSICAL 60000 

140372 ip ZMAKE KERNEL PAGE 4 RESIDENT 


;READ FROM ADDRESS 60000 
SEE IF DATA WAS STORED coment 
TORE WAS CORRECT 


31724 
ast 031726 


:REPLACE ERROR CALL WITH 
2885 14$°* = 000764 
2886 031730 : ;THIS WILL TEST DSTM = 6 'MTPI. 
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8 
MOVE TO PREVIOUS (USER) 


2895 764 
2896 031772 
2897 031776 
2898 032000 
2899 032002 
2900 


2909 
2910 032032 
2911 032036 
2912 032040 
2913 032044 
2914 032050 
2915 032056 


2935 

2936 032142 
2937 032146 
2938 032152 


012767 
012767 
012700 
012767 
012702 


012767 
000423 


016746 
016746 
000002 


031312 
002456 


MACRO M1111 
cE 


I=SPA 


147152 - 


146032 


140316 


147076 
145756 


147150 


140232 


147012 
146144 


16$: 


17$: 


18$: 


19$: 


20$: 


J 6 
25-SEP=79 12:24 PAGE 36-2 


frov #16$,$LPERR 
MOV #030340,PSw 
MOV #52525,RO 


CMP RO 
BEOQ 17$ 
ERROR +24 


aa LOOP ON ERROR POINTER TO 16$ 
oa PREVIOUS MODE USER 
sl TEST DATA_INTO RO 
‘MAKE REGISTER 2 ZERO 
:PUSH TEST a. ON KERNEL STACK 
MAKE KERNEL I PAGE 4 NON-RESIDENT 
“LOAD TEST DATA INTO PHYSICAL 60000 
:MAKE KERNEL PAGE 4 RESIDENT 
READ FROM ADDRESS 60000 
+SEE IF DATA WAS STORED CORRECTLY 
CH _IF STORE WAS CORRECT 
; INCORRECT STORE 
FOR TIGHTER SCOPE LOOP 
sREPLACE ERROR CALL WITH 
1 = 000763 


;THE FOLLOWING WILL TEST’ ‘DS TME? MTPI. 


MoV #18$,$LPERR 
MOV #030340,PSw 
MOV #125252,RO 


MOV #100000 ,$TMP2 


MOV #STMP2 ,R2 
MOV RO,-(KSP) 
CLRB KIPDR4 

MTP] @0(R2) 

MOVB #006 ,KIPDR4 
MOV a 100000, R1 


CMP RO,R 
BEQ noe 
ERROR +24 


MOV #1$,$LPERR 
MOV A#MGMERR ,MMVEC 
BR TST25 


MOV (KSP) +, TRAPPC 
MOV (KSP) +. TRAPPS 
MOV SRO, WASSRO 
MOV SR2,WASSR2 
BIC #160000, SRO 


MOV TRAPPS , = (KSP) 
MOV TRAPPC ,=(KSP) 


SET LOOP ON ERROR POINTER TO 18$ 
SMAKE PREVIOUS MODE USER 
nd TEST DATA INTO RO 

VIRT. ADDR. OF TEST LOCATION 
‘INTO LOCATION STMP2 
[LOAD ADDRESS OF $TMP2 INTO R2 
7PUSH TEST DATA ON KERNEL STACK 
MAKE KERNEL PAGE 4 NON-RESIDENT 
;LOAD TEST DATA INTO PHYSICAL 60000 
MAKE KERNEL PAGE 4 RESIDENT 
READ FROM ADDRESS 60000 
;SEE IF DATA WAS STORED CORRECTLY 
BRANCH IF STORE WAS CORRECT 


E 

GHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 

BR 18$°' = 000763 

SET LOOP POINTER TO START OF TEST 
*RESTORE M.M. VECTOR TO NORMAL ROUTINE 
7 BRANCH TO NEXT TEST 
;SAVE PC & PS OF TRAP 


;SAVE SRO FOR ERROR TYPEOUT 
a7 SR2 FOR ERROR TYPEOUT 


;REPLACE ERROR CALL WITH 
"NoP"* = 00024 

Pur PC & PS OF TRAP ON STACK 

;RETURN TO TEST 


SEQ 0074 
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T25 MFPI (KERNAL) TO SUPERVISOR MODE 


2952 


032154 
2953 032156 
54 1 


010037 
012702 


012767 
105067 


032164 
040340 
036514 
100000 
100000 
032616 
137770 
040340 
000700 


001100 


K_ 6 
MACRO M1111 25=SEP=79 12:24 PAGE 37 


FF RARER AAAAAAAAAAARARAAERAAAAAAAAERARAAY RAARAEREAREARRAERERAEARRARE 


T*TEST 25 MFPI (KERNAL) TO SUPERVISOR MODE 


THIS TEST CHECKS THAT IF_THE PREVIOUS MODE IS KERNEL THE 
FETCH IS FROM KERNEL SPACE. 
THERE IS A DESCRIPTION BEFORE EACH DESTINATION MODE TESTED, 


IF THE CORRECT MODE IS NOT ENABLED A NON-RESIDENT ABORT 
WILL OCCUR AND TRAP TO 21$, WHERE THE ERRORS ARE REPORTED. 


ERR AAAEAKARAAEAAAEARAAEARARAERAARRKEARARERARARARAERKEKRE 
125: SCOPE 
MOV #1$,S$LPERR :SET LOOP ON ERROR TO 1$ 
1$: 6 [GO TO SUPERVISOR MODE FOR THIS TEST 
0 [LOAD DATA PATTERN INTO RO 

: LOAD DATA PATTERN INTO PHY 60000 
MOV #100000,R2 VIRTUAL ADDRESS INTO R2 
;THE FOLLOWING WILL TEST’ STM MFP 


fe aa SET M.M. VECTOR TO 21$ 
SMAKE SUPERVISOR I-SPACE PAGE 4 NON-RESIDENT 
145550 MOV 7040340, PSW SMAKE PREVIOUS MODE KERNEL PRESENT SUPERVISOR 
: KSP PUT KERNEL STACK + yw gf ON SUPERVISOR STACK 
MSUPSTK , SSP WAS SOMETHING PUSHED ON STACK AT 1$ 
5$ BRANCH IF NOTHING WAS PUSHED 
(SSP) +,RO POP SUPERVISOR a INTO RO 
#MKERSTK,R1 ZEXPECTING 1100 AS K 
RO,R1 DID YOU GET THE RIGHT POINTER? 
$ ;BRANCH IF YOU DID 
+23 WRONG THING WAS ens ON STACK 
FOR TIGHTER SCOPE L 
:REPLACE ERROR CALL ITH 
;"BR 4$°* = 0007 


-* 
-* 
-* 
-* 
-* 
** 
** 
-* 
-* 
§ 


i 


6$ 
+25 
sREPLACE, ERROR CALL WITH 
4$"* = 000764 


: THE FOLLOWING WILL TEST “DSTM=1 MFP]. 
MOV #7$,$LPERR :SET LOOP ON ERROR POINTER TO 7$ 
#040340, PSw : EVIOUS MODE KERNEL PRESENT SUPERVISOR 
#36514,RO ;LOAD DATA EXPECTED INTO RO 
#10 90000, R2 LOAD VIRTUAL ADDRESS INTO R2 
READ FROM PHYSICAL 60000 
aepye. R1 “POP SUPERVISOR STACK INTO R1 
RO,R1 ‘WAS DATA FETCHED SAME AS STORED 
8$ ;BRANCH IF CORRECT DATA WAS FETCHED 
+23 WRONG DATA WAS FETCHED 
FOR TIGHTER SCOPE LOOP 
ZREPLACE ERROR CALL WITH 
= 000764 


: ine FOLLOWING WILL TEST ‘pene MEPI. 
146566 #9$ ,SLPERR SET LOOP ON ERROR POINTER TO 9$ 
145446 : #040340. PSW SMAKE PREVIOUS MODE KERNEL PRESENT SUPERVISOR 
#100000 ,R2 LOAD VIRTUAL ADDRESS INTO R2 
(R2)+ [READ FROM PHYSICAL 60000 


SEQ 0075 
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T25 MFPI (KERNAL) TO SUPERVISOR MODE 


012601 (SSP)+,R1 POP SUPERVISOR STACK INTO R1 
020001 RO,R1 TWAS DATA FETCHED SAME AS STORED 
001401 BEQ 10$ BRANCH IF CORRECT DATA WAS FETCHED 
104023 +23 WRONG DATA WAS FETCHED 

[FOR TIGHTER SCOPE LOOP 

;REPLACE ERROR CALL WITH 

a = 000766 


108: syne FOLLOWING WILL TEST’ DSTM=3 MFPI. 
012767 032354 146534 #iis.$ SLPERR ZSET LOOP ON ERROR POINTER TO 11$ 
012767 040340 145414 118: [MAKE PREVIOUS MODE KERNEL PRESENT SUPERVISOR 
537 100000 an) oy 190006 [READ FROM PHYSICAL 60000 
012601 [POP SUPERVISOR STACK INTO R1 
020001 RO,R1 [WAS DATA FETCHED SAME AS STORED 
001401 BEQ ‘BRANCH IF CORRECT DATA WAS FETCHED 
104023 ‘WRONG DATA WAS FETCHED 
[FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
:"BR 11$°' = 000767 
:  sTHE FOLLOWING WILL TEST DSTM=4 MEPI. 
012767 MOV 13$, $LPERR :SET LOOP ON ERROR POINTER TO 13$ 
032404 : #04 PSW sMAKE PREVIOUS MODE DERNEL PRESENT SUPERVISOR 
3018 052412 10000 2.R2 ;LOAD VIRTUAL ADDRESS INTO R2 
32416 006542 2) READ FROM PHYSICAL 60000 
“POP SUPERVISOR STACK INTO R1 
[WAS DATA FETCHED SAME AS STORED 
‘BRANCH IF CORRECT DATA WAS FETCHED 


4° 


oooo 
RORSAORD 


Seeporancese 
eeeeeeee 
SEEVES  EEEY 


SSSSSSSS 

bab atababadadad 

NOUSWN =O 
5 SSS 
o at) 


ar 
BERK 
33 
oO 


PLACE ERROR CALL WITH 
1 = 000766 


:' BR 
+ THE FOLLOWING WILL TEST DSTM=5 MFPI. 


#15$,$LPERR ;SET LOOP ON ERROR POINTER TO 15$ 
#040340,PSw [MAKE PREVIOUS MODE KERNEL PRESENT SUPERVISOR 
#108000. $TMP2 [LOAD TEST LOC. VIRT. ADDR INTO LOC. STMP2 
#<$TMP24+2>,R2 = LOAD ADDRE SS OF $TMP2+2 INTO R2 
a-(R2) ‘ “READ FROM PH VSICAL 60000 
+ 


RO,R1 
16$ 
+23 


: THE FOLLOWING WILL TEST’ * DSTM=6 MEPL. 


012767 032476 #17$,$LPERR SET LOOP ON ERROR POINTER 10 178. 
012767 040340 : #040340, PSwW MAKE PREVIOUS MODE KERNEL PRESENT SUPERVISOR 
005002 Re ;MAKE REGISTER 2 A ZERO 
006562 100000 100000 (R2) ;READ FROM PHYSICAL 60000 
012601 . zPOP SUPERVISOR STACK INTO R1 
020001 RO,R1 WAS DATA FETCHED SAME AS STORED 
001401 [BRANCH IF CORRECT DATA FETCHED 
104023 : WRONG DATA WAS FETCHED 

FOR TIGHTER SCOPE LOOP 

;REPLACE ERROR CALL WITH 

:‘BR 178°" = 000766 


SEReSr Ace SuRCsGy 


sees 
Whoo 








M 
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T25 MFPI (KERNAL) TO SUPERVISOR MODE SEQ 0077 


18$: 7 THE FOLLOWING WILL TEST DSTM=7 MFPI. 


‘ ;SET LOOP ON ERROR POINTER TO 19S 
198: SMAKE PREVIOUS MODE KERNEL PRESENT SUPERVISOR 
#100000; $TMP2 LOAD TEST LOC. VIRT. ADDR. 5 INTO st MP2 


AS_STORED 
F CORRECT DATA FETCHED 
SURONG. DATA WAS FETCHED 

FOR TIGHTER SCOPE LOOP 

;REPLACE ERROR CALL WITH 

:‘BR 198°" = 0007 


7SET A.M. “VECTOR TO NORMAL ROUTINE 

7GO BACK TO KERNEL MODE, PREVIOUS KERNEL 
:SET LOOP "POINTER TO START OF TEST 

ZMAKE SIPDR4 RESIDENT 

: BRANCH TO NEXT TEXT 


(KSP)+,TRAPPC  ;SAVE PC & PS OF TRAP 


(KSP) +, TRAPPS 
0 ae SRO FOR ERROR TYPEOUT 
:SAVE SR2 FOR wr TYPEOUT 
144722 Ic 7CL PAR ERROR BITS IN SRO 
26 TRIED TO READ NON-RESIDENT PAGE 
[FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 


TRAPPS , = (KSP) ‘Pur PC 7 PS OF TRAP ON STACK 
TRAPPC ,~(KSP) 
RETURN TO TEST 


PPITITITITITITITITITIT ITIL TITITiiti Titi itt tittle 


TRTEST 26 MFPI (KERNEL) TO USER MODE 


THIS TEST CHECKS THAT IF THE PREVIOUS MODE IS KERNEL THE 
FETCH IS FROM KERNEL 
THERE IS A DESCRIPTION BEFORE EACH DESTINATION MODE TESTED, 


IF THE CORRECT MODE IS NOT ENABLED A NON-RESIDENT ABORT 
WILL OCCUR AND TRAP TO 21$, WHERE THE ERRORS ARE REPORTED. 


RARE AAEAAAARAEAAAARARARARAERARAARARARAERAAARAARAAAAAAARERERAREAREEAEEE 
126: SCOPE 

052674 #1$, SLPERR 7SET LOOP ON ERROR TO 1$ 

140340 1$: #140540, Psu :60 TO USER MODE FOR THIS TEST 
056514 MOV #3651 LOAD DATA PATTERN INTO RO 
100000 an) 160000 : LOAD DATA PATTERN INTO PHY 
100000 MOV #60000" R2 VIRTUAL ADDRESS INTO R2 
;THE FOLLOWING WILL TEST bSTM=y MFP] 


Fret: 145324 #21$ ,MMVEC 7SET M.M. VECTOR TO 21$ 
44660 UIPDR4 MAKE USER I-SPACE PAGE 4 NON-RESIDENT 
120840 145040 #140340,PSW ;MAKE PREVIOUS MODE KERNEL PRESENT USER 
3098 032736 : KSP ;PUT KERNEL STACK POINTER ON USER STACK 


** 
-* 
** 
** 
** 
-* 
** 
:* 
** 
§ 


i 





N 
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126 MFPI (KERNEL) TO USER MODE 


740 pce 708 000600 MUSE STK ,USP :WAS SOMETHING PUSHED ON STACK AT 1$ 
744 40 5$ ;BRANCH IF NO PUSHED 


001 

1 (USP) +,RO 

012701 #KERSTK,R1 ING 1100 AS KSP 

020001 RO,R1 pie ro GET THE RIGHT POIATER? 
00140 6$ H IF YOU DID 


10402 +23 WRONG THING WAS PUSHED ON STACK 
FOR TIGHTER SCOPE LOOP 
sREPLACE ERROR CALL WITH 
$** = 000766 


4 


Oo 
—_ 
oooo°0c[eo 


6$ 
+25 
PLACE ERROR CALL WITH 
* = 000764 


ye FOLLOWING WILL TEST’DSTM=1 MFPI. 
#7$,$LPERR :SET LOOP ON ERROR POINTER TO 7$ 
#166340, Psu [MAKE PREVIOUS MODE KERNEL PRESENT USER 
#3651 :LOAD DATA EXPECTED INTO RO 
#100006 R2 VIRTUAL R2 
(R2) TRE YSICAL $0000. 

(USP) +,R1 

RO,R1 


032774 
0 


SSBVAARAN=SSSLFARAT 


COSee cece 


Ww 
— 
Nm 
Ww 
So 
AWG 
3S 
Nm 
N 


wa 


WAS DATA FETCHED SAME AS STORED 
8$ BRANCH IF CORRECT DATA WAS FETCHED 
+23 WRONG DATA WAS FETCHED 

:FOR TIGHTER SCOPE LOOP 
3125 sREPLACE ERROR CALL WITH 
3126 7$"" = 000764 


1 
3127 033024 : ;THE FOLLOWING WILL TEST ‘perms MEPL. 
146056 MOV #9$,$LPERR :SET LOOP ON ERROR POINTER TO 9$ 
144736 9S: M6634. PSw “MAKE PREVIOUS MODE KERNEL PRESENT USER 
#100000.R2 *L INTO R2 


WAWWNAWWNAAAWAAAANAAANANAA 
ke ek a ae a ad ad od od od td 


= 
Mmronrr 
Sewn 


AS STORED 
HIF wy) DATA WAS FETCHED 
WRONG DATA WAS FETCHED 
:FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
= 000766 


:  : THE FOLLOWING WILL TEST ined. MFP] 
146024 MOV #11$,$LPERR SET dor ON’ ERROR POINTER TO 11$ 
144704 : MOV #140840 PS MAKE PREV IOUS MODE KERNEL PRESENT USER 
a#100006 TREAD FROM PHYSICAL 60000 

Usps, R1 *POP USER STACK INTO R 

RO.R1 ‘WAS DATA FETCHED cane AS STORED 

12$ BRANCH IF CORRECT DATA WAS FETCHED 

+23 ETCHED 


"BR 
: ;THE FOLLOWING WILL TEST DSTM=4 MEI. 
033114 145774 MOV #13$,SLPERR ;SET LOOP ON ERROR POINTER TO 13% 
140340 144654 : #1.0340,PSw :MAKE PREVIOUS MODE wr PRESENT USER 
100002 #100002 ,R2 ;LOAD VIRTUAL ADDRESS INTO R2 
~(R2) READ FROM PHYSICAL 6 
(USP) +,R1 ;POP USER STACK INTO R1 


NIWAININAIAIAAAANWW 
aed ad ae ah ae eed ed ed eed ee ed ed 
DAVIS BS BS ES ES 
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126 MFPI (KERNEL) TO USER MODE 


3156 033132 020001 RO,R1 ZWAS DATA FETCHED SAME AS STORED 
3157 033134 001401 14$ ‘BRANCH IF CORRECT DATA WAS FETCHED 
3138 033136 104023 ERROR +23 : 


3160 
3161 : = 
$162 035140 :  ; THE FOLLOWING WILL TEST DSTM=5 MFPI. 


012767 033146 145742 #15$,$LPERR zSET LOOP ON ERROR POINTER TO 15$ 
140340 144622 : #140540, PSw [MAKE PREVIOUS MODE KERNEL PRESENT USER 
100000 146020 #100000.$TMP2 :LOAD TEST LOC. VIRT. ADDR INTO LOC. $TMPZ 
001204 MOV #<STMP2+2>, R2 LOAD ADDRESS OF $TMP2+2 INTO R2 
READ FROM PHYSICAL 60000 
oSPhe R1 “POP USER STACK INTO R1 
3170 033172 020001 RO,R1 [WAS DATA FETCHED SAME AS STORED 
3171 033174 E 16$ ;BRANCH IF CORRECT DATA FETCHED 
DATA WAS FETCHED 


3172 033176 +23 

3173 7FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
;"BR 15$'' = 000763 


:THE FOLLOWING WILL TEST DSTM=6 MFPI. 


145702 #17$,$LPERR SET LOOP ON ERROR POINTER TO 17$. 
144562 : #140340,PSW MAKE PREVIOUS MODE KERNEL PRESENT USER 
Re sMAKE REGISTER 2 A ZERO 
100000 (R2) SIC 


(USP) +,R1 
RO,R1 SAME AS STORED 
E 18$ :BRANCH IF CORRECT DATA FETCHED 
3185 033230 +23 WRONG DATA WAS FETCHED 
3186 7FOR TIGHTER SCOPE LOOP 
3187 SREPLACE. ERROR CALL WITH 
; = 000766 


3188 :' BR 

$150 033232 : 3 THE FOLLOWING WILL TEST DSTM=7 MFPI. 

3191 033232 033240 56 #19$ ,SLPERR ;SET LOOP ON ERROR POINTER TO 19% 
140340 : #140340 ,PSW ;MAKE PREVIOUS MODE KERNEL PRESENT USER 
100000 #100000, $TMP2 RT. ADDR. INTO STMP2 
001202 MO #STMP2 ,R2 :L SS INTO R2 

000000 (R 


2) 
(USP) +,R1 
0,R1 


WAWG 


3199 033272 7 WR 

3200 FOR TIGHTER SCOPE "TOO 

3201 :RE PLACE ERROR CALL WITH 

3202 ;‘BR 19$"" 76 

3203 033274 144746 : AMGMERR , MMVEC :SET M.M. VECTOR TO NORMAL ROUTINE 

3204 033302 2 000340 BACK TO KERNEL MODE, PREVIOUS KERNEL 
3205 033310 , :SET LOOP POINTER TO START OF TEST 

3206 033316 000006 #6,UIPDR4 ;MAKE UIPDR4 RESIDENT 

3207 033324 000423 TST27 3 BRANCH TO NEXT TEXT 


3209 . 
3210 033326 : (KSP)+,TRAPPC ;SAVE PC & PS OF TRAP 
3211 033332 012667 (KSP) +, TRAPPS 

3212 033336 016767 145720 SRO ,WASSRO SAVE SRO FOR ERROR TYPEOUT 
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033374 
3234 033376 
3235 033404 
3236 033412 
3237 


3246 033462 
3247 


3248 
3249 033466 
3250 033474 


3256 033516 
3257 


3258 
3259 033520 
3260 526 


016767 
042767 
104026 


016746 
016746 
000002 


1446226 
160000 


145674 
145666 


033412 
033412 
077400 
136706 
136602 
144176 
144152 
036514 
060000 
033672 
000002 
136622 


033474 
010340 
100000 


033526 
010340 
00000 


MACRO M1111 25=SEP=79 12:24 PAGE $725 


MFPI (KERNEL) TO USER MODE 


165716 MOV SR2,WASSR2 ;SAVE SR2 FOR ERROR TYPEOUT 
146212 BIC #160000. SRO ‘CLEAR ERROR BITS IN S 
ERROR : TRIED TO READ NON-RESIDENT PAGE 
‘FOR TIGHTER SCOPE LOOP 
:REPLACE, E ERROR CALL WITH 
MOV TRAPPS , -(KSP) ;PUT PC & PS OF TRAP ON STACK 
MOV TRAPPC ,-(KSP) 
RTI ;RETURN TO TEST 


J FRA RARER REREAREREEERERERREEEEREREREKERRERAEEREERRAEERKEKREKERE 


i*TEST 27 MFP] (SUPERVISOR) WITH SUPER D-SPACE ENABLED 


THIS TEST USES THE ‘MFPI" INSTRUCTION TO ENSURE THAT PREVIOUS 
MODE IS CLOCKED CORRRECTLY, AND THAT D-SPACE IS NOT ENABLED. 


;* 
te 
3” 
te 
is IF THE CORRECT MODE IS NOT ENABLED, A NON-RESIDENT ABORT WILL 
3* OCCUR AND TRAP TO 10$, WHERE THE ERRORS ARE REPORTED. 

on 

§ 


MADD SAAARRRESASSASELASASESARALESE SAAS AA LASALLE RARER ERASE AS DS 


i 


127: SCOPE 

145502 MOV #20$,$LPADR zSET LOOP POINTER TO 208 

145476 MOV #20$.$LPERR :SET LOOP ON ERROR POINTER TO 20$ 
20$: MOV #77400,RO 


;MAKE PAGE 4 IN ALL BUT enn I 
KERNAL I NON-RESIDENT 

ZKERNAL DSPACE PAGE 4 

SUPERVISOR D-SPACE PAGE 4 


MOV RO, KDPDR4 
MOV RO, SDPDR4 


MOV RO.UDPDR4 [USER D-SPACE PAGE 4 
MOV RO.UIPDR4 [USER 1-SPACE P AGE 4 
MOV #36514,RO DATA PATTERN INTO RO 
MOV RO, av6 ‘LOAD DATA PATTERN INTO PHYS. 60000 
144574 MOV #10$ ,MMVEC [SET M.M. VECTOR TO 10$ 
137034 BIS #8171 ,.MMR3 TENABLE SUPERVISOR D-SPACE 
é KERNAL I-SPACE PAGE 4 NON-RESIDENT 


CLRB KIPDR 7MAKE 
; THE FOLLOWING WILL TEST DSTM=1 MFPI. 


145414 MOV #12$,$LPERR :SET LOOP ON ERROR POINTER TO 12% 
144274 12$: MOV #010340,PSW [MAKE PREVIOUS MODE SUPERVISOR 

MOV #100000.R2 [LOAD VIRTUAL ADDRESS INTO R2 

MFPI — (R2) ‘READ FROM PHYSICAL 60000 

MOV (KSP)+,R1 [POP KERNAL STACK INTO R1 

CMP RO,R1 ‘WAS DATA FETCHED SAME AS DATA STORED 

BEQ 4$ SBRANCH IF CORRECT DATA FETCHED 

ERROR +37 + WRONG DATA FET CHED 

;THE FOLLOWING WILL TEST DSTM=2 MFP 
145362 4$: ov #14$,$LPERR :SET LOOP ON ERROR POINTER TO 14$ 
144242 14$: MOV #010340,PSwW MAKE PREVIOUS MODE SUPERVISOR 

MOV 4100000. R3 “LOAD VIRTUAL ADDRESS INTO R2 

MFP] (R2)+ [READ FROM PHYSICAL 100000 

MOV- _— (KSP)+,R1 [POP KERNAL STACK INTO R1 

CMP RO,R1 [WAS DATA FETCHED SAME AS DATA STORED 

BEQ 5§ ZBRANCH IF CORRECTDATA FETCHED 


ERROR +37 WRONG DATA FETCHED 
; THE FOLLOWING WILL TEST DSTM=3 MFPI. 


SEQ 0080 
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127 MFPI (SUPERVISOR) WITH SUPER D=SPACE ENABLED 


3269 033552 012767 033560 145330 S$: #15$,$LPERR 

3270 03 012767 010340 146210 158: #010340, PSwW 
02 100000 #100000,R2 

3272 033572 006537 100000 a#100000 


;SET LOOP ON ERROR POINTER TO 15$ 
;MAKE PREVIOUS MODE SUPERVISOR 
;LOAD VIRTUAL ADDRESS INTO R2 
;READ FROM PHYSICAL 100000 
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127 MFPI (SUPERVISOR) WITH SUPER D=SPACE ENABLED 


3274 033576 012601 MOV (KSP)+,R1 ;POP KERNAL STACK INTO R1 
3275 033600 020001 CMP = RO, RI WAS DATA FETCHED SAME AS DATA STORED 
3276 033602 001401 BEQ 6$ BRANCH IF CORRECTDATA FETCHED 
3277 033604 104037 ERROR +37 ZWRONG DATA FETCHED 
;THE FOLLOWING WILL TEST DSTM=4 MFPI. 
3280 033606 012767 033614 145274 68: Mov «#168, SLPERR ;SET LOOP ON ERROR POINTER TO 16$ 
3281 033614 012767 010340 144154 16$: MOV #010340, PSW MAKE PREVIOUS MODE SUPERVISOR 
3282 033622 012702 100002 MOV - #100002.R2 [LOAD VIRTUAL ADDRESS INTO R2 
3283 033626 006542 MFPI = =(R2) READ FROM PHYSICAL 100000 
3284 033630 012601 MOV (KSP) +,R1 [POP KERNAL STACK INTO R 
3285 033632 020001 CMP = ROR WAS DATA FETCHED SAME AS DATA STORED 
3286 033634 001401 BEO 7$ BRANCH IF CORRECTDATA FETCHED 
3287 033636 104037 ERROR +37 ZWRONG DATA FETCHED 
3288 033640 012767 002456 144402 7$- MOV § #MGMERR,MMVEC  :SET M.M. VECTOR TO NORMAL ROUTINE 
3289 033646 012767 033412 145234 MOV  #20$,$LPERR SET LOOP ON ERROR POINTER TO START OF TEST 
3290 033654 112767 000006 136426 MOVB #6, KIPDR4 MAKE KIPDR4 RESIDENT 
3291 033662 042767 000002 136626 BIC #BiT1 .MMR3 [DISABLE SUPERVISOR D-SPACE 
3292 033670 000426 BR TST30 :;BRANCH TO NEXT TEST 
3294 033672 016767 143674 145364 10$: MOV — MMRO,WASSRO SAVE MMRO FOR ERROR TYPEOUT 
3295 033700 016767 143670 145360 MOV §- MMR1, WASSR1 SAVE MMR1 FOR ERROR TYPEOUT 
3296 033706 016767 14 145354 MOV § MMR2,WASSR2 SAVE MMR2 FOR ERROR TYPEOUT 
3297 033714 016767 136576 145350 MOV § MMR3_WASSR3 SAVE MMR3 FOR ERROR TYPEOUT 
3298 033722 012667 145332 MOV (KSP5+,TRAPPC SAVE PC & PS OF TRAP 
3299 033726 012667 145330 MOV (KSP) +, TRAPPS 
3300 033732 104040 i ERROR +40 ;TRIED TO READ NON-RESIDENT PAGE 
3301 033734 016746 145322 MOV TRAPPS,-(KSP) PUT PC & PS OF TRAP ON STACK 
3302 033740 016746 145314 MOV TRAPPC ,~(KSP) 
3305 033744 000002 RTI 
3314 Wee ARRRAARASRASAALALASZAAALAASARASSASRRERARRRRRARARRARRRRARARS ARRAS SS S| 
;*TEST 30 MTPI(SUPERVISOR) WITH SUPER. D-SPACE ENABLED 


THIS TEST USES THE *MTPI' INSTRUCTION TO ENSURE THAT THE 
PREVIOUS MODE IS CLOCKED CORRECTLY, AND THAT D-SPACE IS NOT 


* 
® 

5? ENABLED. 

;@ IF THE CORRECT MODE IS NOT ENABLED, A NON-RESIDENT ABORT 
* WILL OCCUR AND TRAP TO 10$, WHERE THE ERRORS ARE REPORTED. 
* 
§ 


PETS TItiititiit itt ttt t titi iti tii titi titi tii titi titi i iii t iti titit 
033746 000004 TST3C: SCOPE 
3315 033750 20$: 


3316 033750 012767 034264 144272 MOV #10$ .MMVEC SET M.M. VECTOR TO 10$ 

3317 033756 052767 000002 136532 BIS #8171 MARS ENABLE SUPERVISOR D-SPACE 

3318 THIS WILL TEST DSTM = 1 MTPI 

3319 033764 012767 034010 145116 MOV #13$,SLPERR SET LOOP ON ERROR POINTER TO 13% 
3320 033772 012767 010340 143776 MOV #010340 .PSu ;MAKE PREVIOUS MODE SUPERVISOR 

3321 034000 012705 100000 MOV ;LOAD VIRTUAL ADDRESS INTO R5 

3322 034004 012703 125252 MOV #125252,R3 ;LOAD TEST DATA INTO R 

3323 034010 010346 13$: MOV R3,-(KSP) PUSH TEST DATA ONTO KERNAL STACK 
3324 034012 105067 136272 CLRB KIPDR4 :MAKE KERNAL PAGE 4 NON-RESIDENT 
3325 034016 006615 MTP] (R5) ;LOAD TEST DATA INTO PHYSICAL 100000 
3326 034020 112767 000006 136262 MOVB #006 ..KIPDR4 MAKE KERNAL I PAGE 4 RESIDENT 

3327 034026 011504 MOV (R5) ,R4 ;READ FROM ADDRESS 100000 

3328 034030 020304 CMP R3,R4 SEE IF DATA WAS STORED AT CORRECT PLACE 


3329 034032 001401 BEQ 4$ ;BRANCH IF STORE WAS CORRECT 





CKKTBAO 11/44 MEM MGMT PRT B 


130 


teen 034034 
3332 034036 
3333 034044 
3334 034052 
3335 034056 
3336 034060 
3337 034064 
3338 034070 
3339 034076 
3340 034 


3354 034160 

3355 034162 

3356 

3357 034164 

3358 034172 
200 


3377 034302 
3378 
3379 


1064035 
012767 


033750 
002456 


143302 
143300 
143276 


MACRO M1111 


14$: 


136212 


144772 
143652 


15$: 


136136 


144716 
143576 


16$: 


136062 


144642 7$: 
136234 


10$: 


ses eeaee 


Se Be Be Se Se Be Be Be 


ERROR 
sTHIS WILL TEST 
4$: 


*TEST 31 


F 
25-SEP=79 12:24 PAGE 38-1 
MTPI (SUPERVISOR) WITH SUPER. D=-SPACE ENABLED 


+35 
DSTM = 3 MTP] 


#14$,$LPERR 
#010340,PSw 


DSTM = 6 MIPI 


#16$,$LPERR 
#010340, PS 
#52525, 


R5 
R3,-(KSP) 


: INCORRECT STORE 
SET LOOP ON ERROR POINTER TO 148% 
; ISOR 


. 
e 


; PEOUT 
[TRIED TO LOAD A NON-RESIDENT PAGE 4 


; MAKE 
;PU 
sMAKE K 

L 
; MAK 


MAKE & 
LOAD TEST DATA INTO PHYSICAL 100000 


x 
m 
b-~< 


;MAKE KERNAL I PAGE 4 RESIDENT 
;READ FROM ADDRESS 100000 
SEE IF i Se at WAS STORED = 


‘BRANCH TORED C 
: INCORRECT STORE 


ORRECTL 


:SET LOOP ON ERROR POINTER TO 15$ 


MAKE PREVI 


OUS TYPE SUPERVISOR 
LOAD TEST DATA INTO R 


R3 


;PUSH TEST DATA ON KERNAL STACK 
: LOAD VIRTUAL ard INTO R5 


MAKE KERNAL I PAGE 4 NON-RESIDENT 
[LOAD TEST DATA INTO PHYSICAL 100000 
MAKE KERNAL I PAGE 4 


RESIDENT 


READ FROM ADDRESS 100000 

7SEE IF DATA WAS STORED CORRECTLY 
;BRANCH IF STORED CORRECTLY 

: INCORRECT STORE 


;SET LOOP ON ERROR POINTER TO 16% 
; MAKE PREVIOUS TYPE SUPERVISOR 
;LOAD TEST DATA INTO R3 


R5 ZERO 
SH TEST DATA A. KERNAL STACK 
KERNAL I PAGE 4 NON-RESIDENT 
OAD TEST DATA INTO PHYSICAL 100000 
E KERNAL I PAGE 4 RESIDENT 
AD FROM ADDRESS 100000 


;RE 
[SEE IF DATA WAS STORED CORRECTLY 


BRANCH IF 


: INCORRECT STORE 


3SET 


LOOP ON ERROR POINTER TO START OF TEST 
ROUT INE 


STORED CORRECTLY 


:RESTORE M.M. VECTOR TO NORMAL 


SRETURN TO TEST 


ope ee D-SPACE 


Ahh AAe ee Re RRA RRRSESERASASLASASSALARRALASARR RRR AREAL A RRR RRS AEE SD 


MTP] (USER) WITH USER D-SPACE ENABLED 


THIS TEST USES THE *MTPI* INSTRUCTION TO ENSURE THAT THE 


amd ly MODE IS CLOCKED CORRECTLY, AND THAT D-SPACE IS NOT 


ENABLED. 
IF THE CORRECT MODE IS NOT ENABLED, A NON-RESIDENT ABORT 


WILL OCCUR AND TRAP TO 10$, 


WHERE THE ERRORS ARE REPORTED. 


SEQ 0083 


CKKTBAO 11/44 MEM MGMT PRT B MACRO M1111 " SEP=79 12:24 PAGE $0-) 
731 MTP] (USER) wITH USER D=SPACE ENABLED 


'MARAARARAAARARARARAEAAAASAASLALELESRARA SRR ARERR RRL ARR RRR ARERR RASS 


#77400, SIPDR4 sMAKE SIPDR4 NON-RE 5, VENT 
MAKE UIPDR4 RESIDENT 
;SET M.M. VECTOR TO 108 
[ENABLE USER D-SPACE 


2 SET LOOP ON ERROR POINTER TO 13$ 
MODE R 


i 
208: 


052767 
012767 


100000 
125252 R 
T DATA ONTO KERNAL STACK 
135720 MAKE KERNAL PAGE 4 NON-RESIDENT 
“LOAD TEST DATA_INTO PHYSICAL 100000 
000006 135710 SMAKE KERNAL I oan 4 RESIDENT 
;READ FROM ADDRESS 1 
SEE IF DATA WAS STORED AT nate PLACE 
BRANCH IF STORE WAS CORREC 
: INCORRECT STORE 


SET LOOP ON ERROR POINTER TO 14$ 

MAKE PREVIOUS TYPE USER 

LOAD TEST DATA INTO R3 

PUSH TEST DATA ON a - STACK 

SMAKE KERNAL I PAGE 4 NON-RESIDENT 

+ LOAD TEST DATA INTO PHYSICAL 100000 
MAKE KERNAL I PAGE 4 RESIDENT 

“READ FROM ADDRESS 100000 

+SEE re DATA WAS STORED CORRECTLY 

H IF STORED CORRECTLY 
INCORRECT STORE 


SET LOOP ON ERROR ew TO 15$ 


034430 144472 
030340 143352 
052525 


135652 
100000 


ERROR 
-THIS WILL TEST 
144420 5s: MOV 
143300 


3 
:PUSH TEST DATA ON KERNAL STACK 
= LOAD VIRTUAL ore INTO R5 
MAKE KERNAL I PAGE 4 NON-RESIDENT 
“LOAD TEST DATA_INTO PHYSICAL 100000 
MAKE KERNAL saoes 16 RESIDENT 


READ FROM AD S$ 100000 

7SEE IF DATA WAS STORED CORRECTLY 
BRANCH IF STORED CORRECTLY 

: INCORRECT STORE 


¥ 
ra 
Nm 


1 
1 
13 0 
14 0 
15 0 
16 0 
17 0 
18 0 
19 0 
0 
0 


VMN 


3404 
3406 
ea 
3409 
oo 
%& 
Be 
& 
be) 
4 
4 
4 
% 
34 
4 
3 


VRE EYSRERSE 


0 
1 
2 
3 
4 
5 
6 
7 
8 
9 
20 
21 
22 
3 
24 
25 


EEYY 
m 
ak 


MMrY 
ONO 


34 
34 
34 
34 
34 
34 
4 
3% 
34 
34 
34 
34 
34 
34 
34 
34 
34 


elojolelejejejejeleojo) 
SABRES 
ny & 


RRR EE EY 
ee 
Se 


AYSSB 


144344 
143224 


135510 


A LOOP ON ERROR POINTER TO 16$ 
MAKE PREVIOUS TYPE USER 

[LOAD TEST DATA INTO R3 

co 


RS ZERO 

SH TEST DATA oN KERNAL STACK 
[MAKE KERNAL I PAGE 4 NON-RESIDENT 
SLOAD TEST DATA INTO PHYSICAL 100000 

#006 .KIPDR4 ;MAKE KERNAL I PAGE 4 RESIDENT 

34100000 ,R4 READ FROM ADDRESS 100000 

R3,R4 [SEE IF DATA WAS STORED CORRECTLY 

7$ “BRANCH IF STORED CORRECTLY 





CKRTBAO 11/44 MEM MGMT PR 
131 MTP] (USER) WITH UsER D=-SPACE ENABLED 


¥ 
ae 
oo 
¥ 
o 
rs 


CRERER ERE 
SSSSSBNY 
ooo°o°o 
REE 

TERE 

SnMo 


3463 034710 
3464 
3465 
3466 
3467 034712 
3468 034714 
3469 034716 
3470 034720 
3471 
3472 
3473 
3474 034722 
3484 


034726 
3485 034730 
3486 034736 
3487 034744 
3488 034752 


011601 
020001 


034306 
002456 
000001 
142730 
142726 
142724 


000006 
177776 
001100 


001100 


034752 
034752 


000600 
077400 


H 
MACRO M1111 genre 12:24 PAGE 38-3 


ERROR +35 hs at Y STORE 


144270 7$: MOV #20$,$LPERR T LOOP ON ERROR POINTER TO START OF TEST 
143422 MOV WMGMERR ,MMVEC  :RESTORE M.M. VECTOR TO NORMAL ROUTINE 
135662 BIC #81T0 MARS DISABLE USER D=-SPACE 
TST32 ee H TO NEXT TEST 
10$: MOV MMRO ,RO ; SAVE 0 FOR ERROR TYPEOUT 


; OUT 
[TRIED TO LOAD A NON-RESIDENT PAGE 4 
RTI :RETURN TO TEST 


ee TTT TITITITILITILIELTLILLI LILLE LETTE LLL 


;*TEST 32 MFP] (PREV1OUS=CURRENT=KERNEL ) 
te THIS TEST CHECKS THAT IF BOTH PREVIOUS AND CURRENT MODES 
8 ARE KERNEL, AND THE SOURCE MODE 1S 0, THE DESTINATION 
te STACK IS. NOT DECREMENTED BEFORE ACCESS. 
:* "MFPI KSP’' SHOULD PUSH THE NON-DECREMENTED VALUE 
:* OF KSP (1100) ONTO THE STACK (AT LOC. 1076). 
2 Ceeeeneneeeneeasadeaaaeeeeresanaaanaeersanaeeanenneeeneerereres 
1S132: SCOPE 
135442 1$: MOVB #6, KDPDR4 :MAKE KDPDR4 RESIDENT 
CLR aaePsw SSET PREVIOUS = CURRENT = KERNEL 
MOV #STACK,RO ‘SETUP VALUE FOR STACK POINTER 
MOV RO,KSP [LOAD STACK POINTER 
MFP] -KSP *THE VALUE ‘‘STACK'' SHOULD BE PUSHED 
TBEFORE BEING DECREMENTED 
MOV (KSP) ,R1 [READ DATA WHICH WAS PUSHED 
CMP RO,R1 [WAS THE ORIGINAL VALUE OF THE 
“STACK POINTER PUSHED? 
BEQ 2$ ‘BRANCH IF YES 
ERROR +37 [MFPI FETCHED WRONG DATA 
‘FOR TIGHTER SCOPE LOOP 
[REPLACE ERROR CALL WITH 
"BR 1$'' = 000766 
23: TST -(RO) *SETUP EXPECTED STACK POINTER VALUE 
CMP KSP,RO [WAS THE STACK POINTER DECREMENTED? 
BEQ 3$ SBRANCH IF YES 
ERROR +25 ; STACK NOT PUSHED BY THE MFPI 
FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
"BR 1$'' = 000762 
3$: MOV #STACK.KSP SRESTORE STACK POINTER 
OTT ITITIIITITITII IIIT TTLIIII TTT LLL LLL LLL 
P*TEST 33 MFPD (SUPERVISOR) WITH SUPER D-SPACE ENABLED 
i* THIS TEST CHECKS TO SEE THAT THE REFERENCE IS TO D-SPACE 
te IF THE INSTRUCTION IS AN MFPD. 
te IF THE CORRECT MODE IS NOT ENABLED, A NON-RESIDENT ABORT 
* WILL OCCUR AND TRAP TO 10$, WHERE THE ERRORS ARE REPORTED. 
** 
ESI tttiiit titi titi tit iiititii titi titiiitiiiitiiiti titi itis 
15133: SCOPE 
144150 MOV #20$,$LPADR :SET LOOP POINTER TO 20% 
144144 MOV #20$.$LPERR ‘SET LOOP ON ERROR POINTER TO 20% 
135316 MOV #600. SDPAR4 “MAP SDPARG TO 12k 
20$: MOV #77400,R0 ‘MAKE PAGE 4 IN ALL BUT SUPERVISOR D 


SEQ 0085 


a 11/464 MEM MGMT PRT B 
133 MFPD (SUPERVISOR) WITH 


3519 035116 
3520 


3521 
3522 035120 


3529 035152 
3530 


3531 
3532 035154 


3544 234 
3545 035240 


035074 
010340 
100000 


035126 
010340 
100000 


100000 


035162 
010340 
100002 


MACRO M1111 25=SEP=79 12:24 PAGE 38-4 


SUPER D=SPACE ENABLED 


135224 


143226 
135466 


144046 
142726 


144014 
142674 


143762 


142642 


143034 
143666 
135266 


2$: 


12$: 


4$: 


14$: 


5$: 


15$: 


6$: 


16$: 


7$: 


RO, KDPDR4 
RO, SIPDR4 
RO,UDPDRS 
RO,UIPDRS 


#77406, SDPDRS 
RO 


ode. 


Woe mmave 
#B81T1 MAR 


+ AND KERNAL | faa. 
KERNAL D=-SPACE PAGE 4 
SUPERVISOR wy B 4 
;USER D=SPACE PAGE 4 
USER I-SPACE PAGE A 
[MAKE SDPDR4 RESIDENT 
;LOAD DATA PATTERN INTO RO 
LOAD DATA PATTERN INTO PHYS. 100000 
7SET M.M. VECTOR TO 10$ 
7 ENABLE SUPERVISOR D-SPACE 
MAKE KERNAL I-SPACE PAGE 4 NON-RESIDENT 


CLRB KIPDR hes 
: THE FOLLOWING WILL TEST DSTM=1 MF PD 


#12$,$LPERR 
#010340, PSw 
#100000.R2 
(R2) 

(KSP) +,R1 


4$ 


#14$,$LPERR 
#010340, PSW 
#100000 ,R2 

(R2)+ 
(KSP)+,R1 


RO,R1 
5$ 


ROR +37 ; WRONG 
; THE FOLLOWING WILL TEST DSTM=3 MF 


#15$,$LPERR 
800345 
avi 100000" 
(KSP)+,R1 


RO,R1 
6$ 


#16$,$LPERR 
#010340, PSW 
#100002.R2 

wir?) 
(KSP)+,R1 
R1 


7$ 
+37 


MMGMERR , MMVE C 
ye SLPERR 


1T1,MMR3 
#77406,RO 
RO,KIPDR4 
RO.UDPDR4 


SET LOOP ON ERROR POINTER TO 12$ 
;MAKE PREVIOUS MODE SUPERVISOR 
: LOAD VIRTUAL ADDRESS INTC R2 
;READ FROM PHYSICAL 100000 
;POP KERNAL STACK INTO R1 
WAS DATA FETCHED SAME AS DATA STORED 
SBRANCH IF CORRECT DATA WAS FETCHED 
ONG DATA WAS FETCHED 


ROR +37 7 WR 
: THE FOLLOWING WILL TEST DSTM=2 MFPD 


SET LOOP ON ERROR POINTER TO 14% 
SMAKE PREVIOUS MODE SUPERVISOR 

+ LOAD VIRTUAL | INTO R2 

;READ FROM PHYSICAL 100000 

[POP KERNAL STACK INTO R17 

WAS DATA FETCHED SAME AS DATA STORED 
BRANCH IF CORRECT DATA WAS FETCHED 
r WAS FETCHED 


SET LOOP ON ERROR POINTER TO 15$ 
MAKE PREVIOUS MODE SUPERVISOR 

zLOAD VIRTUAL ADDRESS INTO R2 

;READ FROM PHYSICAL 100000 

POP KERNAL STACK INTO R1 

;WAS DATA FETCHED SAME AS DATA STORED 
BRANCH IF CORRECT DATA WAS FETCHED 

; WRONG — FETCHED 


+37 
THE FOLLOWING WILL TEST DSTM=4 MF 


;SET LOOP ON ERROR POINTER TO 16$ 
MAKE PREVIOUS MODE SUPERVISOR 
= LOAD 4 ada ae INTO R2 

READ FROM PHYSICAL 100000 

[POP KERNAL STACK INTO R1 

[WAS DATA FETCHED SAME AS DATA STORED 
;BRANCH IF CORRECT ee WAS FETCHED 


TOR 

LOOP ON ERROR POINTER TO START OF ROUTINE 
DISABLE SUPERVISOR DSPACE 

Set UP RO FOR 4K RESIDENT R/W 

[MAKE KIPAR4 RESIDENT 

MAKE UDPDR4 RESIDENT 


SEQ 0086 


J 
ote 11/44 MEM MGMT PRT B MACRO M1111 25=SEP=79 12:24 PAGE 38-5 


MFPD (SUPERVISOR) WITH SUPER D-SPACE ENABLED SEQ 0087 

3546 035244 000423 BR TST34 ; {BRANCH TO NEXT TEST 

3547 035266 016767 142320 144010 10$: MOV  MMRO, WASSRO SAVE MMRO FOR ERROR TYPEOUT 

3548 035254 016767 142314 144004 MOV MRT, WASSR1 SAVE MMR1 FOR ERROR TYPEOUT 

3549 035262 016767 142310 144000 MOV § MMR2,WASSR2 SAVE MMR2 FOR ERROR TYPEOUT 

5270 012667 143764 MOV (KSP)+,TRAPPC SAVE PC & PS OF TRAP 

3551 035074 012667 143762 MOV (KSP) +, TRAPPS 

3552 03 104040 ERROR +40 ; TRIED TO READ NON-RESIDNT PAGE 

3553 035302 016746 143754 MOV TRAPPS,=(KSP)  :PUT PC & PS OF TRAP ON STACK 

3554 035306 016746 143746 MOV TRAPPC ,=(KSP) 

3555 035312 000002 RTI ;RETURN TO TEST 

3568 'MARRARASRARASZAZASLALALAAAAAAESARLER ARES E SERRE RRR RRR RRR ARE RAR RRS SS 
TATEST 36 MFPI (USER/PREV USER) WITH USER D-SPACE ENABLED 
-* 


THIS TEST oe THAT IF THE INSTRUCTION IS EITHER MFP] OR 
MTPI AND BOTH THE PRESENT AND PREVIOUS MODES ARE USER, THEN 
D-SPACE IS USED IF IT IS ENABLED. IN THIS WAY AN OPERATING 


-* 

-* 

2@ 

;* SYSTEM CAN MAKE PROPRETARY CODE “EXECUTE ONLY’ FOR THE USER. 
-* 

;@ IF THE CORRECT MODE IS NOT ENABLED, A NON-RESIDENT ABORT WILL 
-* 

-* 

§ 


OCCUR AND TRAP TO 10$, WHERE THE ERRORS ARE REPORTED. 


. 
° 
. 
: RRA AEAEAEEAAEEARERAEEAEAEREERAEAEAAAERAERAERAERAEEREERERREE 
T 


035314 000004 134: SCOPE 
3569 035316 012767 035332 143562 MOV #20$,$LPADR :SET LOOP POINTER TO 208 
3570 035324 012767 035332 143556 MOV #20$,$LPERR iSET LOOP ON ERROR POINTER TO 20% 
3571 035332 012767 000600 142330 20$: MOV MAP UDPAR4 TO 12k 
3572 035340 012700 036514 MOV #36514, RO “LOAD DATA PATTERN INTO RO 
3573 035344 010037 100000 MOV a#100000 [LOAD DATA PATTERN INTO PHYS. 100000 
3574 035350 012767 035606 142672 MOV ae. MMVEC [SET M.M. VECTOR TO 10$ 
3575 035356 052767 000001 135132 BIS #81T0,.MMR3 TENABLE USER D-SPACE 
3576 035364 105067 134640 CLRB —« SDPDR& [MAKE SDPDR4 NON-RESIDENT 
3577 035370 105067 134714 CLRB KIPDR4 MAKE KERNAL I-SPACE PAGE 4 NON-RESIDENT 
3255 THE FOLLOWING WILL TEST DSTM=1 MFPI 
3580 035374 012767 035402 143506 2%: MOV #12$,$LPERR :SET LOOP ON ERROR POINTER TO 12% 
3581 035402 012767 170340 142366 12$: MOV #170340,PSW :SET PREVIOUS MODE TO USER 
_ 3582 035410 012702 100000 MOV #100000.R2 : LOAD VIRTUAL ADDRESS INTO R2 

3583 035414 006512 MFP] (R2) “READ FROM PHYSICAL 100000 
3584 035416 012601 MOV (USP) +,R1 ‘POP USER STACK INTO R1 
3585 035420 020001 CMP RO,R1 [WAS DATA FETCHED SAME AS DATA STORED 
3586 035422 001401 BEQ 4$ ‘BRANCH IF CORRECT DATA WAS FETCHED 
3587 035424 104037 ERROR +37 * WRONG DATA, WAS FETCHED 
3588 ;THE FOLLOWING WILL TEST DSTM=2 MFP 
3590 035426 012767 035434 143454 4$: MOV #14$,$LPERR :SET LOOP ON ERROR POINTER TO 14% 
3591 035434 012767 170340 142334 14%: MOV #170340 ,PSW :SET PREVIOUS MODE TO USER 
3592 035442 012702 100000 MOV #100000.R2 :LOAD VIRTUAL ADDRESS INTO R2 

593 03 006522 MFP] (R2)+ “READ FROM PHYSICAL 100000 

94 035450 012601 MOV (USP) +,R1 ‘POP USER STACK INTO R1 
3595 035452 020001 CMP RO,R1 [WAS DATA FETCHED SAME AS DATA STORED 
3596 035454 001401 BEQ 5$ ‘BRANCH IF CORRECT DATA WAS FETCHED 
3597 035456 104037 ERROR +37 “WRONG DATA WAS FETCHED 
3598 ;THE FOLLOWING WILL TEST DSTM=3 MFPI 
3600 035460 012767 035466 143422 5$: MOV #15$.$LPERR :SET LOOP ON ERROR POINTER TO 15% 
3601 035466 012767 170340 142302 15$: MOV #170340, PSW SSET PREVIOUS MODE TO USER 


ORE 11/44 MEM MGMT PRT B MACRO M1111 25=SEP=79 12:24 PAGE 38-6 
1% MFPI (USER/PREV USER) WITH USER D-SPACE ENABLED 


3602 035474 012702 100000 #100000 ,R2 ZLOAD VIRTUAL ADDRESS INTO R2 
035500 006537 100000 a#100000 [READ FROM PHYSICAL 100000 
035504 012601 (USP) +,R1 [POP USER STACK INTO R1 
RO,R1 [WAS DATA FETCHED SAME AS DATA STORED 
6$ ;BRANCH IF CORRECT DATA WAS FETCHED 
ERROR +37 ‘WRONG DATA WAS FETCHED 
;THE FOLLOWING WILL TEST DSTM=4 MFPI 


035522 63: #16$, SLPERR :SET LOOP ON ERROR POINTER TO 16$ 
170340 : #170340,PSW :SET PREVIOUS MODE TO USER 
00002 MO 00002.R2 [LOAD VIRTUAL ADDRESS INTO R2 
[READ FROM PHYSICAL 100000 
“POP USER STACK INTO R1 
[WAS DATA FETCHED SAME AS DATA STORED 
‘BRANCH IF CORRECT DATA WAS FETCHED 
[WRONG DATA WAS FET TCHED 
RESTORE M.M. VECTOR 
T LOOP ON ERROR POINTER TO START OF ROUTINE 


oO 


jolololololeolololelololol=) 


WIAA ANIA AIA AI AWWW 

MANA VIUAIWI UII UU 
SELSEREEEE 
SSRFLSERVS 


7SAVE PC & PS OF TRAP 


(KSP) +, TRAPPS 

+40 ; TRIED TO READ NON-RESIDENT PAGE 
143414 MO TRAPPS,-(KSP)  ;PUT PC & PS OF TRAP ON STACK 
143406 TRAPPC ,=(KSP) 


3631 035646 
<O36 035652 000002 ;RETURN TO TEST 





CKKTBAO 11/44 MEM MGMT 
END OF PASS ROUTINE 


35 


035706 
035710 
035714 
035734 
035734 
035740 


016746 


104405 
104401 
000421 


016746 


100402 
052716 


PRT B 


000020 
010000 


143200 
000020 


MACRO M1111 25=SEP=79 12:24 PAGE 9 


143336 


143036 


. SBTTL END OF PASS ROUTINE 


{RRRRRARRARAAARARARRRARAARAR ERT REARARERA TAR RRERRRRERE ERE ER REE 
; * INCREMENT THE PASS NUMBER (SPASS) 
; * TYPE + PASS #XXXXX TOTAL NUMBER OF — SINCE-LAST REPORT yvyyyy"’ 


T*WHERE X XX AND YYYYY “es! — NUMBERS 
e1F su2= i “INABIT TRACE T 
te] THERES A MONITOR GO TO aT 
**]F THERE SN"? JUMP TO LOOP 
$EOP: 
SCOPE 
CLR STSTNA a te THE TEST NUMBER 
INC SPASS + INCREMENT THE PASS NUMBER 
BIC #100000, $PASS a ALLOW A NEG. NUMBER 
DEC (PC)+ 3: 
SEOPCT: .WORD 1 
BGT SDOAGN szves 
MOV (PC)+,a(PC)+ ; RESTORE COUNTER 
SENDCT: .WORD 1 
SEOPCT 
TYPE ,65$ 2 i TYPE ASCIZ STRING 


MOV SPASS ,~(SP) 


TYPE ,67$ 
BR 66$ 
i678: “ASCIZ. / TOTAL ERRORS 
"MOV SERTTL,-(SP) 
TYPE  ,$CRLF 
CLR $ERTTL 


$GET42: MOV a#42,RO 
BEQ SDOAGN 


CLR -(SP) 
MOV #$CLR.T,-(SP) 
BR SRTRN 
$CLR.T: 
MOV a#42,R0 
BEQ $SDOAGN 
RESET 
SENDAD: JSR PC, (RO) 
NOP 
NOP 
NOP 
$DOAGN: 
TRAP 
BIC #20, (SP) 
BIT #B1T12,aSWR 
BNE 


1$ 
COM $TBIT 
BM! 1 
BIS #20, (SP) 


BR 645 
> eASCIZ <12><15>/END PASS #/ 


:GET OVER THE ASCIZ 


33 SAVE An FOR TYPEOUT 
22 TYPE P S NUMBER 

:GO TYPE-~DECIMAL ASCII WITH SIGN 
:3 TYPE ASCIZ STRING 

3;GET OVER THE 
SINCE LAST REPORT / 


73SAVE SERTTL FOR TYPEOUT 
;: TOTAL NUMBER OF ERRORS 
33GO TYPE--DECIMAL ASCII WITH SIGN 
33 TYPE Soin tah LINE FEED 


MONI TOR 
SINSURE THE °T"’ BIT IS CLEAR 
3 SETUP FOR AN RTI OR RTT 

DO AN RTI OR RTT TO LOAD THE PSW 
i:WITH A CLEARED ‘T'' BIT 


32 INSURE RO CONTAINS THE MONITORS 
3 ;RETURN ADDRESS 
3:CLEAR THE WORLD 

TO MONITOR 


77 SAVE ROOM 
73FOR 
3ZACT11 
sPUSH OLD PSW Me. PC ON STACK 


Stet LEAR THE ‘'T’' BIT 
2 RUN WITH TRACE TRAP? 


:BR I 
3318 wi TIME FOR TRACE TRAP 
SET TRACE TRAP 


aa 


SEQ 0089 


™ 
CKKTBAO 11/44 MEM MGMT PRT B MACRO M1111 25=SEP=79 12:24 PAGE 39-1 
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036116 012746 : MOV #$LOOP ,-(SP) 7; JUMP TO START OF TEST 
2 000002 SRTRN: RTI hip Ah mets HIS IS CHANGED TO 
"RIT’’ IF ‘RIT’ IS A LEGAL 
<UINSTRUCTION 
SLOOP : 


JMP a(PC)+ ; RETURN 
SRTNAD: LOOP 
SENULL : “BYTE -1,-1,0 3;NULL CHARACTER STRING 
» SBTTL SCOPE HANDLER ROUTINE 


errr iittiitiiiittiiittiiitiiiiiiiiiiiii ii 
[*THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 
; #AND LOAD THE TEST NUMBER(STSTNM) INTO THE DISPLAY REG. (DISPLAY<7:0>) 
;*AND LOAD THE ERROR FLAG (SERFLG) INTO DISPLAY<15:08> 
; * THE SWITCH OPTIONS ule BY THIS ROUTINE ARE: 
;*SW14= LOOP ON TEST 

LOOP ON ERROR 

LOOP ON TEST IN SWR<7:0> 


:;SCOPE=I0T 


104410 KSWR ::TEST FOR CHANGE IN SOFT-SwR 

032777 142776 : BIT #B1T14,aSWR [LOOP ON PRESENT TEST? 

001062 BNE VER VES IF SW14=1 

:MHHMASTART OF CODE FOR THE XOR iéSTembonne 

000416 $XTSTR: BR 6% 31F RUNNING ON THE ‘OR’ TESTER CHANGE 
:I THIS INSTRUCTION TO A ‘NOP’' (NOP=240) 

013746 000004 @#ERRVEC ,- (SP) 13 SAVE THE CONTENTS OF THE ERROR VECTOR 

MOV #58 Q#ERRVEC OR TIMEOUT 


ar 
(SP) +, a@#ERRVEC 
SSVLAD 


BR ; 
5$: (SP) +, (SP)+ tICLEAR THE STACK AFTER A TIME OUT 
(SP) +, A#ERRVEC : :RESTORE THE ERROR VECTOR 
BR ON THE PRESENT TEST 
6$:;M#MAMEND OF CODE FOR THE XOR * TESTERSAMAE 
000400 142726 BIT #81T08,aSWR :: LOOP iy SPEC. TEST? 


2s 

142720 142660 33 SWR<7:0> 
SOVER 

142653 


BEQ $SVLAD 
142700 r ie tol a 
142636 : - oe »SLPADR 3;SET LOOP ADDRESS TO LAST SCOPE 


SERFLG Sr THE roo okee 
STSTNM ¢ ¢ COUNT TEST NUMBERS 

142740 MO STSTNM,STESTN SET TEST NUMBER IN APT MAILBOX 
(SP) ,$LP ; ISA ADDRESS 


‘ADR 
(SP) | $LPERR S 
SESCAPE ROR ADDRESS 
142603 MO #1, SERMAX 72O0NLY ALLOW ONE(1) ERROR ON NEXT TEST 
142622 SOVER: os STSTNA. ct} eal B se R 


RTI 
-SBTTL ERROR HANDLER ROUTINE 
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00 
116767 
004767 


02 
016716 
022737 
001001 


142416 
002052 


142424 


001000 


142352 
142450 


142442 
036056 


MACRO M1111 


142554 
000004 


142410 


000042 


N 
25-SEP-79 12:24 PAGE 39~2 


fF SAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAAAARERARAARAA ERAS 


TR THIS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 
;*SAVE THE ERROR we TEM NUMBER AND 


;*AND GO ON ERROR 
is THE he wy, oe thon BY THIS ROUTINE ARE: 


7$: 


1$: 


20$: 


21$: 
223: 
2$: 


3$: 
4$: 


5$: 


6$: 


TO ERRTYP 


THE ADDRESS OF THE ERROR CALL 


INHIBIT ERROR TYPEOUTS 
BELL ON ERROR 


LOOP ON ERROR 


N 7 ERROR= 


2 $REGS 
STSTNM, TESTNO 
SERFLG 


7$ 
STSTNM,@DISPLAY 
+ T10,aSWR 


ERTTL 
(SP) , SERRPC 
#2, SERRPC 
@SERRPC $1 TEMB 
#B81T13,aSWR 
20$ 
PC,ERRTYP 
-SCRLF 
MAPTENV, SENV 


$ 
$ITEMB,21$ 
ae 


0 

22$ 

aSwWR 

3$ 
#B1T09,aSWR 
SLPERR, (SP) 
3 SCAPE 
SESCAPE , (SP) 
ASENDAD , 0442 
6$ 


EMT AND N=ERROR ITEM NUMBER 


zz TEST FOR — IN SOF T=SwWR 
SAVE THE CONT 


; SAVE 

sSAVE THE pelt OF RS 

;SAVE THE TEST — 

SET THE ERROR FLAG 

;7DON'T LET THE FLAG GO TO ZERO 

:zDISPLAY TEST NUMBER AND 
L ERROR? 


ee T THE NUMBER OF ERRORS 
32GET ADDRESS OF ERROR INSTRUCTION 
STRIP AND SAVE THE ERROR ITEM CODE 


SISKIP TYPEOUT IF SET 
73SKIP_TYPEOQUTS 
::GO TO USER ERROR ROUTINE 


7 RUNNING IN APT MODE 

33NO,SKIP APT ERROR REPORT 

77SET ITEM NUMBER AS ERROR NUMBER 
:sREPORT FATAL ERROR TO APT 


2 cAPT ERROR LOOP 
HALT ON ERROR 

: SKIP IF CONT INUE 

T ON ERROR! 
7: TEST FOR CHANGE IN SOF T-SwR 
;:LOOP ON ERROR SWITCH SET? 
::BR_IF NO 
: FUDGE RETURN FOR LOOPING 
::CHECK FOR AN ESCAPE ADDRESS 
::BR_IF NONE 
:zFUDGE RETURN ADDRESS FOR ESCAPE 


2 :ACT~ -11 MTOnACEPT? 
CH IF NO 


oe 


ERROR FLAG 


SEQ 0091 
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ERROR HANDLER ROUTINE 


RTI 7 RETURN 


001221 ERRTYP: , SCRLF "CARRIAGE RETURN’' & ‘LINE FEED*’ 
MOV RO,-(KSP) SAVE RO. 
:PICKUP THE ITEM INDEX 


71F_ ITEM NUMBER IS ZERO, JUST 
TYPE THE PC OF THE ERROR 
142310 SERRPC ,-(SP) 7;SAVE SERRPC FOR TYPEOUT 

; ERROR ADDRESS 

+3GO TYPE--OCTAL ASCII(ALL DIGITS) 


:GET OUT 
ZADJUST THE INDEX SO THAT IT WILL 
;WORK FOR THE ERROR TABLE. 


R 
001114 4S] TEMB RO 
BNE 1$ 


ates TABLE POINTER 
[PICKUP ‘ERROR MESSAGE'' POINTER 
‘SKIP UF YPEOUT IF NO POINTER 
; TYPE THE ‘ERROR MESSA 
2$: .WOR 0 ZF RROR MESSAGE"' POINTER GOES HERE 
:* ‘CARRIAGE RETURN’' & ‘LINE FEED 
3$: “PICKUP ‘DATA HEADER’’ POINTER 
5$ SKI PEOUT IF 0 
TYPE THE ‘DATA HEADER’ 
4$: WOR 0 “DATA HEADER’ POINTER GOES HERE 
‘CARRIAGE RETURN’' & ‘LINE FEED’ 
5$: 7SAVE R 
PICKUP © ‘DATA TABLE'’ —— 
‘BR IF DATA TO BE TYPED 
MOV sPICKUP MP DATA FORMAT’ POINTER 
6$: RO) I IT FORMAT 0? 


BNE 7$ IF NO 
:*THIS CODE IS FOR OCTAL (e-its F FORMAT (DF=0) 
013146 MOV a(R1)+,-(SP) he a(R1)+ FPR TYPEOUT 
104402 TYPOC :GO TYPE--OCTAL ASCII(ALL DIGITS) 


000456 BR 11$ 
-*THIS CODE IS FOR DECIMAL FORMAT (DF=1) 
121027 7$: CMPB (RO) ,#1 z1S IT FORMAT 1? 


BNE 8 BRANCH IF NO 
013146 MOV a(R1)+,-(SP) : 7 SAVE a(R1)+ FOR TYPEOUT 
104405 TYPDS 7:GO TYPE--DECIMAL ASCII WITH SIGN 


50 BR 11$ 
:*THIS CODE IS FOR BINARY FORMAT (DF=2) 
121027 8S: CMPB (RO) M2 :1S IT FORMAT 2 
001003 CH IF NO 
013146 MOV a(R1)+,=(SP) 1 SAVE @(R1)+ FOR TYPEOUT 
104406 TYPBN TYPE=-BINARY ASCII 


BR 11$ 
-*THIS CODE IS FOR OCTAL (22-BI1T) FORMAT (DF =3) 
121027 $$: CMPB (RO) #3 :1S IT FORMAT 3? 
1011 15$ ‘BRANCH IF NO 
(R1)+,-(KSP) ‘PUT ADDRESS OF FIRST LOC. ON STACK 
PC, $DB20 ‘CONVERT TWO LOCS. TO AN ASCII STRING 
#3, (KSP) [ONLY NEED 8 CHARACTERS NOT 11 
MOV (KSP) +, 10$ [PUT ADDRESS OF ASCII CHARS. AT 10S 
3693 036760 : TYPE OCTAL VALUE OF 22-B81T BINARY NO. 


~ 











3694 036762 
3695 


3702 037004 
3703 037010 
3704 037014 
3705 037020 
3706 037024 
3707 037030 


3721 037071 
3722 


037072 


037176 
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000000 
010246 
01 


022767 


PRT B 


037066 


001221 
040 


000176 
142036 
142032 
177600 
000007 
142002 
040027 
040034 
141024 
040045 
141754 


141750 
177600 
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000 


142040 


000001 


15$: 


16$: 
11$: 
12$: 
13$: 


14$: 


R3,-(KSP) 
a(R1)+, R3 


» 
Nm 


(KSP) +, 16$ 


0 
(KSP) + ,R3 
(KSP)+,R2 


(KSP)+,R1 
(KSP)+,RO 
-$CRLF 

PC 

ae 

0 


-BYT 
. SBTTL TTY INPUT ROUTINE 


FEAR ERR EEEREEREERERRERREREREAEREREEEEEEERERERER EEE 


“ ENABL 


LSB 


10$: «WORD 0 
;*THIS CODE IS FOR OCTAL (22-BIT) FORMAT FOR A PAR LEFT SHIFTED 6 (DF=4) 
R2,~(KSP) 7 SAV ACK 


3R2 HOLDS UPPER SIX he OF NUMBER 
:SHIFT VALUE LEFT 6 TIMES 

;HOLDS LOWER 16 BITS OF ADDRESS 
sHOLDS UPPER 6 BITS OF ADDRESS 
;PUT ADDRESS OF LOWER BI 


ZONLY NEED 8 CHARACTERS NOT 11 
PUT ADDRESS OF ASCII CHARS. AT 16$ 


:TYPE OCTAL VALUE OF 22-B81T BINARY NO. 


RESTORE R3 
RESTORE R2 
71S ge ANOTHER NUMBER? 


;BR IF NO 

s TYPE TWO(2) SPACES 

sPOINT TO NEW ‘DATA FORMAT’ 

; LOOP 

RESTORE R1 

sRESTORE RO 

: "CARRIAGE RETURN'' & ‘LINE FEED’ 


URN 
:TWOC2) SPACES 


MADARA LAAAASAAAASRAASALASAAAAAAALASASALASARALARSALARESRA SAAR ASSESS! 


> *SOFTWARE SWITCH REGISTER CHANGE ROUTI 


;*ROUTINE IS ENTERED FROM THE 


NE. 
TRAP HANDLER 


AND WILL 
>*SERVICE THE TEST FOR CHANGE IN SOFTWARE SWITCH REGISTER TRAP CALL 


;*WHEN OPERATING IN TTY FLAG MODE . 
SCKSWR: MSWREG, SWR 


SGTSWR: 


19$: 
7$: 


CMP 


po 
15$ 


a$TkB,-(SP) 
#°(177, (SP) 
#7, (SP) + 


15$ 
$AUTOB 41 
15$ 
-SCNTLG 

. SMSWR 
SWREG,~ (SP) 


/SMNEW 
=(SP) 

-(SP) 

asTks 

7$ 
a$TkB,-(SP) 
#°C177, (SP) 


z1S THE SOFT-SWR SELECTED? 
i CH IF NO 
23 CHAR THERE ? 


:1F NO, DON'T WAIT AROUND 
; 7 SAVE 


:7NO, RETURN TO USER 


so SWREG FOR TYPEOUT 


THE 
::1F NOT TRY AGAIN 
::PICK UP CHAR 
72MAKE IT 7-BIT ASCII 


TS ONTO STACK 
CONVERT TWO LOCS. TO AN ASCII STRING 


SEQ 0093 


D & 
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037202 000003 (SP) #3 iTS IT A_CONTROL=C? 
037206 BN 9$ $ CH IF NOT 
001312 - SCNTLC iiYES, ECHO CONTROL=-C (“C) 
000006 #6,SP [CLEAN UP STACK 
141711 SINTAG,41 7 :REENABLE TTY KEYBOARD INTERRUPTS? 
; ;sBRANCH_IF NO 
#100,a$TKS + sALLOW TTY A pg INTERRUPTS 
CNTRLC EST 
(SP) ,#25 
10$ 


; H NO 
* ged (“U) 


19$ 
(SP) ,415 :IS IT A <CR>? 
16$ a3 CH IF NO 
4 (SP) szYES, IS IT THE FIRST CHAR? 
11$ 33 CH IF YES 
141634 — 


000006 : 
001221 : ,SCRLF LF> 
141615 000001 SINTAG,A41 53 NABLE TTY KBD INTERRUPTS? 


33 NOT 
000100 141612 #100, a$TKS ;ZREENABLE TTY KBD INTERRUPTS 


001060 : PC, $TYPEC 
000060 (SP) ,#60 


18$ 
000067 (SP) ,467 
8$ 


F YES 


1 IF YES 
000060 #60, (SP) + “OFF ASCII 
000002 2(SP). HIS THIS THE FIRST CHAR 


IF 
:3NO, SHIFT PRESENT 
oe CHAR OVER TO MAKE 
ROOM FOR NEW ONE. 
000002 17$: 2(SP) KEEP COUNT OF CHAR 
177776 -2(SP), (SP) ;SET IN NEW CHAR 
BR 7$ =I GET THE NEXT ONE 
001220 18$: , SQUES Zi TYPE ?<CR><LF> 
037412 BR 20$ sz SIMULATE CONTROL-U 


SLR EREREKEKEEEEEERAEREREREEEEREREKEREERERE RE 


:*THIS ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY 


> *CALL: 

s@ RDCHR + ¢ INPUT A SINGLE CHARACTER FROM THE TTY 
:* RETURN HERE ; CHARACTER IS ON THE STACK 

- WITH PARITY BIT STRIPPED OFF 


037414 $RDCHR: (SP) ,-(SP) ::PUSH DOWN THE PC 
000002 MOV 4 (SP) ,2(SP) 1 SAVE THE PS 
1$: a$TkS ::WAIT FOR 
BP 1$ *ZA CHARACTER 
000004 a$TKB,4 (SP) * READ THE TTY 
000004 rate PO 4(SP) ::GET RID OF JUNK IF ANY 
000023 4(SP) #23 *:1S IT A CONTROL-S? 
BNE 3$ BRANCH IF NO 
037456 105777 : astKs * WAIT FOR A CHARACTER 
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037716 


INE 


010346 
00 


PRT B 


141456 
177600 


040012 
040022 


000003 
001312 


000256 
000177 


000134 
040010 
177777 
040012 


000144 
040010 


000134 
040010 


000025 
040022 
000022 


001221 


8 
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000170 


000124 


sé (PRR RRBRRASZASASLSASSSLLSSESSASASESARR RAR ASARA RR AARSARR ARR RRR SAAD SS DS 


7*THIS ROUTINE WILL INPUT A STRING FROM THE TTY 


3; INPUT A STRING FROM THE T 
a ste OF FIRST CHARACTER "une BE ON THE STACK 
TERMINATOR WILL BE A BYTE OF ALL O'S 


10$: 


6$: 


5$: 


7$: 


8$: 


*CALL: 


2$ 
a$TKB,-<SP) 
#°C177, (SP) 
(SP) +,421 
2$ 

1$ 

4 (SP) ,#140 
4$ 

4 (SP) ,#175 


4 
#40 ,4(SP) 


RDLIN 
RETURN HERE 


R3,-(SP) 
-(SP) 
#STTYIN,R3 


AMSTTYINGS. ,R3 


4$ 


(SP)+, (R3) 
#3, (R3) 
10$ 


TRLC 
#177, (R3) 
5$ 
(SP) 
6$ 
#'\ 9S 
#-1, (SP) 
R3 
emails 
(R3) ,9$ 
9$ 


2 


$ 
(SP) 


: BR IF YES 


3GO READ ONE CHARACTER FROM THE TTY 


:2GET CHARACTER 
iTS IT A_CONTROL-C? 
CH IF NO 


ZT TYPE A CONTROL-C (“C) 
;CLEAN RUBOUT KEY OFF OF THE STACK 


; ;RESTOR 


BR IF NO 
IIIs on THE FIRST RUBOUT? 


ees A THERE 


E R3 
+ GOTO ewer C RESTART 
IT A RUBOUT 


7:BR IF NO 
7z TYPE A BACK SLASH 
72:SET THE RUBOUT KEY 


; ;BACKUP 


BY ONE 


yf ge EMPTY? 


3260 READ ANOTHER CHAR. 


:BR_IF YES 
23 SETUP ay TYPEOUT THE DELETED CHAR. 


: ¢RUBOUT KEY SET? 
:BR_IF NO 

>: TYPE A BACK SLASH 

;:CLEAR THE RUBOUT KEY 


3233 oe A CTRL U? 


;:BR IF NO 
7: TYPE A CONTROL ‘U"' 


::GO START 


OVER 


2i1S CHARACTER A 
CH_IF 


NO 
2: CLEAR THE PHAR TER 


TYPE A *'CR’ 


A ‘'*R'"? 


LF 


SEQ 0095 


rae 
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037722 040012 $TTYIN £2 TVPE THE INPUT STRING 
000706 2$ G0 pb ICKUP ANOTHER CHACTER 


BR 
001220 : , SQUES ity 

BR 1$ :CLEAR THE BUFFER AND LOOP 
stein, (R3) ,9$ ECHO THE CHARACTER 


9 
000015 #15, (R3)+ +s CHECK FOR RETURN 
BNE 2$ LOOP IF NOT RETURN 
177777 :2CLEAR sony (THE 15) 
001222  $L ie TYPE A LINE FEED 
SP ;;CLEAN RUBOUT KEY FROM THE STACK 
{RESTORE R R3 
3 ADJUST THE STACK AND PUT ADDRESS OF THE 
3 FIRST ASCII CHARACTER ON IT 
TTYIN,4(SP) 


+: RETURN 
9$: : STORAGE FO FOR ASCII CHAR. TO TYPE 
STTYIN: . 8. ‘RESERVE 3. BYTES FOR TTY INPUT 
SCNTLU: . 7*U/<15><12> CONTROL ‘U'' 


SCNTILG: . /*G/<15><12> 3; CONTROL ‘'G’' 
SMSWR: . <15><12>/SWR = 


SMNEW : 


~SBTTL CONTROL=C SERVICING ROUTINE 


CNTRLC: SPASS ,STMPS GET THE VALUE ote Yt 
$STMP5 FORM CURRENT PASS # 
.CMSG TYPE THE TEST STOPS HERE 
STSTNM,1$ 7SAVE TEST NUMBER 
1$,-(SP) 7SAVE 1$ FO TYPEOUT 


.c$ 
$STMPS ,-(SP) SAVE STMPS FOR TYPEOUT 
ao ASCII DECIMAL WITH SIGN 
ASK FOR NEW SWR VALUE 
1s ie : JUMP TO END oo PASS + 2 


. BUF FE 
2$: , 2 SPACES & STOP MESSAGE 
CMSG: ASCII] /JUMPING TO END OF PASS/<15><12> 


-ASCIZ /TESTNO PASSNO/<15><12> 


040162 
3740 040165 
040170 
040173 
040176 


-OoO—-—- SS Ho 
Mm—NMNNN- ON 
Ww SWONA NNO 
~~ 2 O-- O0O- - - 
ZSUBLARRSN==US 
DH NINIWOOWME AWS 





G & 
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040201 117 015 O12 
040206 000 





H & 
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CONTROL=C SERVICING ROUTINE 
3742 040205 000 -BYTE 0 
3743 -SBTTL TYPE ROUTINE 


Wehbe hee RRRRRRRRRRRRRRRRRARRRRARRRARARRARA RRR SARA RAL ERA RAR SSS S| 


:*ROUTINE TO TYPE ASCIZ MESSAGE. 


MESSAGE MUST TERMINATE WITH A O BYTE. 


; *THE —_ WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE 


FEED. 
L CONTAINS THE CHARACTER " BE USED AS THE FILLER CHARACTER. 
THE NUMBER OF FILLER CHARACTERS REQUIRED. 


SPILLS CONTAINS 
$FILLC CONTAINS 


;*CALL: 
01) = A TRAP pede 
TYPE -ME SAD 


105767 140745 ; : STPFLG 
100002 BP 1$ 


3$ 

RO,-(SP) 

@2(SP) ,RO 
141010 —_ 


BNE 6 
141001 ee 


RO,61$ 
PC,$ATY3 


61$: . WORD 
140757 : #APTCSUP , SENVM 
BN 0$ 
(RO) +,=(SP) 
4$ 
(SP) + 


(SP) +,RO 
#2,(SP) 


#HT, (SP) 
#CRLF , (SP) 
5$ 

(SP) + 


— 


2 
PC ,S$TYPEC 
SFILLC, (SP) + 


2s 
$NULL ,~ (SP) 
1(SP) 

6$ 


PC ,STYPEC 
SCHARCNT 


BR 7$ 
;HORIZONTAL TAB PROCESSOR 


THE CHARACTER TO FILL AFTER. 


sMESADR IS FIRST ADDRESS OF AN ASCIZ STRING 


iIS THERE A TERMINAL ? 
i288 IF HERE IF NO TERMINAL 
; | LEAVE 


VE RO 
7:GET ADDRESS OF ASCIZ STRING 
: ; RUNNING IN APT MOD 
:NO,GO CHECK FOR APT CONSOLE 
3:SPOOL MESSAGE TO APT 


:NO,GO CHECK FOR CONSOLE 
: SETUP ME SSAGE gre Se FOR APT 


2c YES, SKIP TYPE OUT 
PUSH CHARACTER TO BE TYPED ONTO STACK 
TBR IF IT ISN'T THE TERMINATOR 
32 1F TERMINATOR POP IT OFF THE STACK 
7 RESTORE RO 
; ADJUST RETURN PC 
7 ;RETURN 


7 BRANCH IF <HT> 
; BRANCH IF NOT <CRLF> 


:zPOP <CR><LF> EQUIV 
:z TYPE A CR AND LF 


3:CLEAR CHARACTER COUNT 

3:GET NEXT CHARACTER 

3:G0 TYPE THIS CHARACTER 

el IT hy: FOR FILLER CHARS.? 


ED? 
; 2 BR IF NO--GO POP THE NULL OFF OF STACK 
:GO TYPE A NULL 
::D0 NOT COUNT AS A COUNT 
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3744 


040374 
040400 


112716 
004767 


112767 
112767 
000403 
112767 


140524 


000002 
140504 
140500 
177600 
000023 
140460 
140454 
177600 
000021 
000015 
000014 


000012 


000002 
140370 
140376 


140366 
140362 
000004 


I & 
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a bn WITH SPACE 
7; TYPE A SPACE 


; STOP 

:=POP SPACE OFF STACK 

3;GET NEXT CHARACTER 

;zWAIT UNTIL PRINTER IS READY 


;LOAD CHAR TO BE TYPED INTO DATA REG. 
ZISEE IF KEYBOARD IS TALKING. 
‘BRANCH IF IT ISN'T. 


CHARACTER ONTO STACK. 
:IBIT CLEAR TOP wg. AND PARITY BIT. 
7;SEE IF THIS IS A “S. 
; BRANCH TO CONTINUE IF IT ISN'T. 
33 HER INPUT. 


SIBIT CLEAR TOP run AND PARITY BIT. 
73 SEE IF THIS IS A 

BRANCH BACK FOR Moré WAIT IF NOT. 
3348 a. i A CARRIAGE RETURN? 


IF 
: :: YES~=CLEAR CHARACTER COUNT 


IT 
1S on ee LINE FEED? 


;=CHARACTER COUNT STORAGE 


RAERAAEAEEEEEAREAAEEAERAEEEEAEEAAAAEAERAEAEAAEERERERARARAEREEREAREEEREEE 


3:TO REPORT FATAL ERROR 
72T0 TYPE A MESSAGE 


3:TO ONLY REPORT FATAL ERROR 


:7PUSH RO ON STACK 
: PUSH R1 ON STACK 
ST TYPE A MESSAGE ? 


NO 
; ;OPERAT ING UNDER APT? 
;IF NOT: BR 
2: SHOULD Sat y MESSAGE S? 


: IF 
GET NRE SSAGE ADDR. 
; ;BUMP RETURN ADDR. 
441s IF DONE W/ LAST XMISSION? 
:1F NOT: WAIT 
2: PUT ADDR IN MAILBOX 
FIND END OF MESSAGE 


37;SUB START OF MESSAGE 
3:GET MESSAGE LNGTH IN WORDS 
7 7PUT LENGTH IN MAILBOX 
:7 TELL APT TO TAKE MSG. 


MACRO M1111 
8$ MOVBso#”*_ , (SP) 
$ JSR PC, STYPEC 
000122 BITB #7,$CHARCNT 
BNE 9$ 
TST (SP) + 
BR 2$ 
STYPEC: TSTB  a$TPS 
BPL $TYPEC 
140516 MOVB  2(SP),a$TPB 
STB. —s @STKS 
BPL 2 
MOV a$TkKB,-(SP) 
BIC #177600, (SP) 
CMP #23, (SP)+ 
BNE 2s 
3$: TSTB . a@$TKS. 
BPL 3$ 
MOV a$TkB,-(SP) 
BIC ory E00. (SP) 
CMP #21, (SP)+ 
BNE 
000002 28: CMPB ss #CR,, 2 (SP) 
BNE 1$ 
CLRB  $CHARCNT 
BR $TYPEX 
000002 1$: CMPB ss #LF., 2 (SP) 
BEQ $TYPEX 
INCB (PC) + 
SCHARCNT:.WORD 0 
$TYPEX: RTS PC 
.SBTTL APT COMMUNICATIONS ROUTINE 
000236 $ATY1: MOVB  #1,$FFLG 
000226 $ATY3: MOVB #1,$MFLG 
BR SATYC 
000220 $ATY4: MOVB #1,$FFLG 
$ATYC 
MOV RO,-(SP) 
MOV R1.-(SP) 
TSTB = SMFLG 
BEQ S$ 
140440 cMPB #APTENV, SENV 
140431 BITB § #APTSPOOL.SENVM 
BEQ 3$ 
MOV @4(SP),R 
000004 ADD #2,4(SP) 
1$ TST SMSGTYPE 
BNE 
MOV RO SMSGAD 
2$: TSTB (RO) + 
BNE 3 
SUB $MSGAD ,RO 
ASR RO 
MOV RO, $SMSGLGT 
140336 MOV #4, SMSGTYPE 
BR 5$ 


SEQ 0099 


J §& 
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APT COMMUNICATIONS ROUTINE SEQ 0100 


017667 000004 000016 3$: a4 (SP) ,4$ :zPUT MSG ADDR IN JSR LINKAGE 
062766 000002 000004 #e 4 (SP) -BUMP RETURN ADDRESS 
016746 137066 177776, =(SP) 7 ¢PUSH 199776 ON STACK 
004767 177272 PC. STYPE ::CALL TYPE MACRO 


105767 000062 $: SEFLG £ SHOULD REPORT FATAL ERROR? 
140314 ; RUNNING UNDER APT? 


12$ BR 
140266 : TIF INISHED LAST MESSAGE? 
;31F NERA WAIT 


11$ : 
000004 140260 33GET 
000002 000004 24(SP) ;BUMP RETURN ADDR. 
140244 73 TELL abi TO TAKE ERROR 
000020 : 7:CLEAR FATAL FLAG 
000013 7-CLEAR LOG FLAG 
000006 77 CLEAR MESSAGE FLAG 

. POP STACK INTO R1 
(SP) +,RO ; POP STACK INTO RO 
C URN 


P RE 
SMFLG: . ; :MESSG. FLAG 
SLFLG: 0 :LOG FLAG 
SFFLG: 0 TZFATAL FLAG 


0 
» SBTTL BINARY TO ASCII AND TYPE ROUTINE 
JERE ERE ERE EREEEEAEEREERERERERRE EE 
+ *THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 16-8I1T 
o> "yaa NUMBER AND TYPE IT. 
** g 
ial NUMBER , - (SP) 7 NUMBER TO BE TYPED 
sk si TYPE IT 
010146 $TYPBN: R1,-(SP) 7: SAVE R1 ON THE STACK 
016601 6(SP),R1 7:GET THE INPUT NUMBER 
7zSET *'C'' SO CAN KEEP TRACK OF THE NUMBER OF BITS 
1$: d 72SET CHARACTER TO AN ASCII ‘0'’. 
R1 33GET THIS BIT 


: INOM=SET THE CHARACTER EQUAL TO THIS BIT 
GO TYPE THIS BIT 
i? CLEAR ic SO CAN KEEP TRACK OF BITS 
DO THE NEXT BIT 
, ::POP THE STACK INTO R1 
2(SP);4(SP) ADJUST THE STACK 


(SP)+, (SP) 
2 2RETURN TO USER 
$BIN -BYTE 0,0 TORAGE FOR ASCII CHAR. AND TERMINATOR 
-SBTTL BINARY TO OCTAL (ASCII) AND TYPE 
Trier t titi iiiiitititiiititiilitiiiiiiiiiiiiiitiritirit irri 
[*THIS ROUTINE IS USED TO — A 16-BIT BINARY NUMBER TO A 6-DIGIT 
;*OCTAL (ASCII) NUMBER AND TYPE IT 
i #STYPOS---ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 
-@ 


lelelelelelele) 
SPERPESASLSSIS 


oo 


oe td ot td 
vw 


RRRRRRRRRRKKKKK 


3 
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NUM, -(SP) > NUMBER TO BE TYPED 
23 CALL FOR TYPEOUT 
N ;N=1 TO 6 FOR NUMBER OF DIGITS TO TYPE 
-BYTE ™ M21 OR 0 
32 1=TYPE LEADING ZEROS 
7, 0=SUPPRESS LEADING ZEROS 


-* 

7 *STYPON----ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
; s$1¥POS OR $TYPOC 

** 3 


5 MOV NUM, - (SP) ; NUMBER TO BE TYPED 
:* TYPON 7zCALL FOR TYPEOUT 


& 
7 *STYPOC---ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 


7 *CALL 


: MOV NUM, = (SP) ; ;NUMBER TO BE TYPED 


** T 
$TYPOS: a(SP) ,-(SP) “PICK MODE 

MO ; sLOAD ZERO FILL SWITCH 

R OF DIGITS TO TYPE 
+ SADJUST RETURN ADDRESS 


73SET THE ZERO FILL SWITCH 


a FOR S1X(6) DIGITS 
ie on ITERATION COUNT 


7;GET THE NUMBER OF DIGITS TO TYPE 
; SUBTRACT IT FOR MAX. ALLOWED 
. E sz SAVE IT FOR USE 
SOF ILL,R4 7 :GET THE ZERO FILL SWITCH 
12(SP),R5 es NUMBER 
R3 7 CLEAR T WORD 
2 ROT ATE MSB INTO ‘‘C’’ 


DO MSB 
::FORM THIS DIGIT 


pee et +t OEE Y & See Ete vet + 4. 
RNSELS FSEAEENSNSERSS 


>] 
oa 


: 7 ¢GET LSB OF THIS DIGIT 
000076 iy TYPE THIS DIGIT? 


7$ :tBR IF NO 
177770 . SIGET RID OF JUNK 
4$ 7: TEST FOR 0 
3; SUPPRESS THIS 0? 
;;BR IF YES 
ANYMORE 0'S 
I IF NOT ALREADY 
PING 


ZISAVE FOR TY 
3:GO TYPE THIS DIGIT 


200 
202 
204 


PERRIN 
RIOR RNSaNS 


‘> 
N 


04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 


tS INSURE LAST DIGIT ISN'T A BLANK 
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::GO DO THE LAST DIGIT 
i sRESTORE RS 
pin th R4 


;ZRESTORE R3 
(SP), *4(SP) 7 ;SET THE STACK FOR RETURNING 
SP)+, (SP) 


6$: 


( 
( 
( 
2 
( 
RETURN 
0 Fist ORAGE FOR ts DIGIT 
0 3; TERMINATOR FOR TYPE ROUTINE 
0 :;OCTAL DIGIT COUNTER 
0 2 ZERO FILL SWITCH 
0 :=NUMBER OF DIGITS TO TYPE 


g 
SEPESSSSSERS 


04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
04 
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PRT B 
CONVERT BINARY TO DECIMAL AND TYPE ROUTINE SEQ 0103 
3748 « SBTTL CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 


J RAAAAERAAAAAAAAAAAAAARAAAAAAAAARAREEAAEREEAERARAREAAREERERREREED 


;*THIS ROUTINE IS USED TO CHANGE A 16-81T BINARY NUMBER TO A 5-DIGIT 
AND TY ND HER THE 
S POSITIVE OR 
;*BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL ALWAYS BE 
; #REPLACED WITH SPACES. 
:* MOV NUM, = (SP) 3 ¢PUT_THE ye A tee ON THE STACK 


-* 
$TYPDS: 
RO,-(SP) 


WAWAWG 
= 
ALENOO 


$3 POINTER 
Ht of THE FIRST CHARACTER TO A BLANK 
7: CLEAR THE a AL ~ pone 


GET THE CONSTAN 
::FORM THIS BCD DIGIT 
‘INCREASE THE BCD DIGIT BY 1 


:zADD BACK THE CONSTANT 
4 hee BCD DIGIT=0 


ALL THROUGH IF 0 
STILL DOING LEADING 0°S? 
;;BR IF YES 


SRERNE ER eKoNS 


gee 
aand 


neRRes 


6$ ::BR IF NO 
177777 MOVB _—«1(SP) ,=1(R3) - THE SIGN 
6 #0, R2 MAKE THE BCD DIGIT ASCII 
R2 MAKE IT A SPACE IF NOT ALREADY A DIGIT 
T THIS CHARACTER IN THE OUTPUT BUFFER 


BRE KRERSE 
EYSRS 


RE 
NRO 


RRRRS 
ENSSE 


177777 +=177776 


SRE 


041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 


ease 
ARNO 
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CONVERT BINARY TO DECIMAL AND TYPE ROUTINE SEQ 0104 
041 016666 000002 000004 MOV 2(SP) ,4(SP) sZADJUST THE STACK 
041510 01261 MOV (SP)+, (SP) 

041512 sag RTI 7 RETURN TO USER 
041514 02 $DTAL: 10000. 
041516 001750 1000. 
834 000144 100. 
041522 000012 10. 
041524 SDBLK: .BLKW 4 
3749 .SBTTL SAVE AND RESTORE RO-R5 ROUTINES 

fF AAAAARAAAAAARAAARAAARARAEARAAAAAAERARARAARARAAARRARERERREAREDEE 

7 *SAVE 

7*CALL: 

:* SAVREG 

*UPON RETURN FROM SSAVREG THE STACK WILL LOOK LIKE: 

** 

7 *TOP---(+16) 

p* +2---(+18) 

pe 44=-—--R5 

D* +6---R4 

j* +8---R3 

3*+10==-R2 

3*4+12---R1 

> #+14---R0 
041534 SSAVREG: 
041534 010046 MOV RO,-(SP) 7zPUSH RO ON STACK 
041536 010146 MOV R1,-(SP) r - R1 ON STACK 
041540 010246 MOV R2,-(SP) 77PUSH R2 ON STACK 
041542 0346 MOV R3,-(SP) 7 PUSH R3 ON STACK 
041544 010446 MOV R4,-(SP) 72PUSH R& ON STACK 
041546 010546 MOV RS,-(SP) b ¥ RS ON STACK 
041550 000022 MOV 22(SP) ,-(SP) 72 SAVE PS OF MAIN FLOW 
041554 016646 000022 MOV 22(SP) ,-(SP) 77 SAVE PC OF MAIN FLOW 
041560 016646 000022 MOV 22(SP) ,-(SP) 77 SAVE PS OF CALL 
041564 016646 000022 MOV 22(SP) ,- (SP) sz SAVE PC OF CALL 
041570 000002 RTI 

;*RESTORE RO-R5 

7*CALL: 

;* RESREG 
041572 SRESREG: 
041572 012666 000022 MOV (SP)+,22(SP) szRESTORE PC OF CALL 
041576 012666 000022 MOV (SP)+,22(SP) szRESTORE PS OF CALL 
041602 012666 000022 MOV (SP)+,22(SP) RESTORE PC OF MAIN FLOW 
041606 012666 000022 MOV (SP)+,22(SP) ZzRESTORE PS OF MAIN FLOW 
041612 012605 MOV (SP)+,R5 77zPOP STACK INTO R5 
041614 012604 MOV (SP)+,R4 72:POP STACK INTO R4& 
041616 012603 MOV (SP)+,R3 33 STACK INTO R3 
041620 012602 MOV (SP)+,R2 7zPOP STACK INTO R2 
041622 012601 MOV (SP)+,R1 :zPOP STACK INTO R1 
041624 012 MOV (SP)+,RO 3zPOP STACK INTO RO 
041626 000002 RTI 

3750 -SBTTL DOUBLE LENGTH BINARY TO OCTAL ASCII CONVERT ROUTINE 


WEAR ARASASZLSLASLSALALELASALLSERES ARERR ERR A RRR SAAR ASRS ARR ARERR SD 


[*THIS ROUTINE WILL CONVERT A 32-BIT UNSIGNED BINARY NUMBER TO AN 
; #UNS IGNED OCTAL ASCIZ NUMBER. 


*CA 


;@ MOV #PNTR,~(SP) 7sPOINTER TO LOW WORD OF BINARY NUMBER 
;@ JSR PC ,a#$DB20 33;CALL THE ROUTINE 


’ 
’ 
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DOUBLE LENGTH BINARY TO OCTAL ASCII CONVERT ROUTINE SEQ 0105 


-% RE TURN ; THE ADDRESS OF THe FIRST ASCIZ CHAR. IS ON THE STACK 
041630 104413 $0B20: SAVREG Z:SAVE ALL REGISTERS 

041632 016601 000002 MOV 2(SP) ‘PICKUP THE POINTER TO LOW WORD 
041636 012705 041747 MOV wsoctvt +13. ARS POINTER TO DATA TABLE 

041642 012 000014 MOV URS *:D0 ELEVEN CHARACTERS 

041646 012703 177770 MOV Ate R3 + /MASK 

041652 012100 MOV (R1)+,RO + LOWER WORD 

041654 012101 MOV (R1)+.R1 + HIGH WORD 

041656 005002 CLR R2 ;: TERMINATOR 

041660 110245 1$: MOVB _——R2,=(R5) ‘PUT CHARACTER IN DATA TABLE 

041662 010002 MOV RO,R2 +:GET THIS DIGIT 

041664 DEC +: COUNT THIS CHARACTER 

041666 7 BGT 3$ :3BR IF NOT THE LAST DIGIT 

041670 001405 BEQ 2$ IF IT IS THE LAST DIGIT 

041672 005205 INC R5 T:ALL DIGITS DONE~ADJUST POINTER | FOR FIRST 
041674 010566 000002 MOV R5,2(SP) :3ASCIZ CHAR. & PUT IT ON THE S 

041700 104414 RESREG SSRESTORE ALL REGISIERS 

041702 000207 RTS PC + RETURN TO USER 

0417046 006203 2$: ASR R3 *:POSITION THE MASK FOR THE LAST DIGIT 
041706 006001 3$: ROR R1 +:POSITION THE BINARY NUMBER FOR 
041710 006000 ROR RO Ae THE NEXT OCTAL DIGIT 

041712 006001 ROR R1 

041714 006000 ROR RO 

041716 006001 ROR R1 

041720 006000 ROR RO 

041722 040302 BIC R3,R2 ;3MASK QUT ALL JUNK 

041724 062702 000060 ADD #°0,R2 [MAKE THIS CHAR. ASCII 

041730 000753 BR 1$ £260 PUT IT IN THE DATA TABLE 

041732 SOCTVL: .BLKB 14, RESERVE DATA TABLE 
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CKKTBAO 11/44 MEM MGMT PRT B = MACRO M1111 
TRAP DECODER SEQ 0106 
3752 .SBTTL TRAP DECODER 
MePERSBAESALALSZLLALLASLESE SELES ES ERE RARER RSE RRR RRR RRR RSE RRR SEAR ARS 
:*THIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE "TRAP" INSTRUCTION 
SAND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 
;*OF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED 1? WILL 
*GO TO THAT ROUTINE. 
041750 010046 STRAP: MOV RO,-(SP) SAVE RO 
041752 016600 000002 MoV —2($P) ,RO ::GET TRAP ADDRESS 
041756 005740 TST —-=(RO) BACKUP BY 2 
041760 111000 MOVB (RO) ,RO 73GET RIGHT BYTE OF TRAP 
0417 300 ASL —s- RO POSITION FOR INDEXING 
041764 016000 042004 MOY $TRPAD(RO) .RO :: INDEX TO TABLE 
041770 000200 RTS TO ROUTINE 
giTHIS 1S USE TO HANDLE. THE “GETPRI' MACRO 
041772 011646 $TRAP2: MOV (SP) ,=(SP) :MOVE THE PC DOWN 
041774 016666 000004 000002 MoV 4 SPS ,2( SP) SIMOVE THE PSW DOWN 
042002 000002 RTI TIRESTORE THE PSW 
.SBTTL TRAP TABLE 
THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
S*BY THE ‘TRAP’ INSTRUCTION 
; ROUT INE 
042004 041772 $TRPAD: .WORD  $TRAP2 
2006 040206 $TYPE ; ;CALL=TYPE TRAP+1(104401) TTY TYPEOUT ROUTINE 
042010 041106 $TYPOC °:CALL=TYPOC - TRAP+2(104402) TYPE OCTAL NUMBER (WITH LEADING ZEROS) 
042012 041062 STYPOS ::CALL=TYPOS | TRAP+3(104403) TYPE OCTAL NUMBER (NO LEADING ZEROS) 
042014 041122 STYPON ::CALL=TYPON  TRAP+4(104404) TYPE OCTAL NUMBER (AS PER LAST CALL) 
042016 041310 STYPDS ::CALL=TYPDS — TRAP+5(104405) TYPE DECIMAL NUMBER (WITH SIGN) 
042020 041 STYPBN ::CALL=TYPBN — TRAP+6(104406) TYPE BINARY (ASCII) NUMBER 
2022 037142 $GTSWR ::CALL=GTSWR - TRAP+7(104407) GET SOFT-SWR SETTING 
042024 037072 SCKSWR ::CALL=CKSWR —- TRAP+10(104410) TEST FOR CHANGE IN SOFT-SWR 
042026 037414 $RDCHR ::CALL=RDCHR —- TRAP+11(104411) TTY TYPEIN CHARACTER ROUTINE 
2030 0375 SCALL=RDLIN  —_- TRAP#12(104412) TTY TYPEIN STRING ROUTINE 
042032 041534 S$SAVREG ::CALL=SAVREG TRAP+13(104413) SAVE RO-R5 ROUTINE 
2034 041572 SRESREG ::CALL=RESREG  TRAP+14(104414) RESTORE RO-R5 ROUTINE 
3753 .SBTTL POWER DOWN AND UP ROUTINES 
LEAR AAA REEEREREEEREEREREEEEEREEEREEEEERERREEERKEREREREREERERER 
“POWER DOWN ROUTINE 
042036 012737 042214 000024 $PWRDN: MOV  #SILLUP,a#PWRVEC ;;SET FOR FAST UP 
2044 012737 000340 000026 MOV #340, @#PWRVEC+2 ;:PRIO:7 
042052 010046 MOV —RO, = (SP) PUSH RO ON STACK 
042054 010146 MOV —s-R1.=(SP) PUSH R1 ON STACK 
042056 010246 MOV —- R2. = (SP) PUSH R2 ON STACK 
2060 010346 MOV —«R3.= (SP) PUSH R3 ON STACK 
042062 010446 MOV = R4. = (SP) PUSH R4 ON STACK 
042064 010546 MOV RS. = (SP) PUSH R5 ON STACK 
2066 017746 137046 MOV  aSWR, - (SP) PUSH @SWR ON STACK 
042072 010667 000122 MOV «SP, SSAVR6 SAVE SP 
042076 012737 042110 000024 MOV UP, a#PWRVEC’ ;;SET UP VECTOR 
042104 HALT 
042106 000776 BR -2 ; ; HANG 
Pee TT eT Tee TTT Te TTT TTT TT TTT TTT TET TT TTT TTT TTT TTT TTT TLE Tt 
“POWER UP ROUT INE 
042110 012737 042214 000024 $PWRUP: MOV #SILLUP.WPURVEC : SET FOR FAST DOWN 
042116 016706 000076 V —- $SAVR6,$ ::GET SP 
042122 005067 000072 CLR —- $SAVR6 iWAIT LOOP FOR THE TTY 
042126 005267 1$: INC $SAVR6 SiWAIT FOR THE INC 
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1$ 
(SP) +, @SWR 


3zPOP_STACK INTO RO 
DN, @#PWRVEC’ :;SET UP THE POWER DOWN VECTOR 
#340, a#PWRVEC+2 ;:PRIO:7 

+ ¢REPORT THE POWER FAILURE 
PWRMSG ;POWER FAIL Siar POINTER 
(PC) +, (SP) 

START 

000020 #20,2(SP) eb LEAR *'T’’ BIT 
137076 $TBIT i,CLEAR THE ‘T’’ BIT FLAG 


: = THE POWER UP woe WAS STARTED 
FOR R DOWN WAS COMPLETE 
SSAVR6: 0 


: RE 
PWRMSG: .ASCIZ <12><15>? POWER FAILURE - RESTARTING ?<12><15> 


015 
117 
122 
101 
125 
040 
122 
124 
124 
107 
015 


oo---O0o--O- O 
of H-OOUM NFS 
oo HSMN += ONO 


042260 





E . 
CKKTBAO 11/44 MEM MGMT PRT B MACRO tag ee 12:24 PAGE 43 


ERROR MESSAGES, DATA HEADERS-TABLES & FORMA SEQ 0108 
3759 -SBTTL ERROR MESSAGES, DATA HEADERS-TABLES & FORMATS 
3760 »NLIST BEX 
3761 042264 125 116 105 EMI: -ASCIZ /UNEXPECTED CPU TRAP TO LOC. 004/ 
3762 042324 125 116 105 EM: -ASCIZ /UNEXPECTED MEM. MGMT. TRAP TO LOC. 250/ 
3763 042373 115 105 115 E—M10: .ASCIZ /MEMORY MGMT. ACCESS ABORT DID NOT OCCUR/ 
3764 042443 101 103 103 EM11: .ASCIZ /ACCESS ERROR DID NOT ABORT INSTRUCTION/ 
3765 042512 123 122 060 EM12: .ASCIZ /SRO DID NOT REPORT ACCESS ERROR CORRECTLY/ 
3766 042 123 122 062 EM13: .ASCIZ /SR2 DID NOT LOCKUP CORRECT VIRTUAL ADDR./ 
3767 042635 120 101 107 E€M14: .ASCIZ /PAGE LGTH. ABORT OCCURRED WHEN IT SHOULDN'T HAVE / 
3768 042716 120 101 107 €M15: .ASCIZ /PAGE LGTH. ABORT DID NOT OCCUR WHEN IT SHOULD HAVE/ 
3769 04 123 122 060 EM16: .ASCIZ /SRO DID NOT REPORT PAGE LGTH. ABORT CORRECTLY/ 
3770 043057 123 122 060 EM21: .ASCIZ /SRO OR SR2 CHANGED BY A SECOND ABORT/ 
3771 043124 123 122 060 EM2e: ASCIZ /SRO OR SR2 WERE NOT ‘RESET’’ BY A RESET/ 
3772 043173 123 122 062 EM23: .ASCIZ /SR2 NOT TRACKING CORRECTLY/ 
3773 0432 104 111 1046 E—M24: .ASCIZ /DID NOT TRAP THRU KERNEL SPACE/ 
3774 043265 113 124 040 EM25: .ASCIZ /KT ERROR SERVICED ON ODD ADDR. ERROR/ 
3775 043332 123 122 060 EM26: .ASCIZ /SRO OR SR2 CHANGED BY ODD ADDR. ERROR/ 
3776 0434 105 122 122 EM27: .ASCIZ /ERROR DURING ‘DOUBLE ERROR’ (KT & ODD ADDR.)/ 
3777 043455 115 106 120 EM30: .ASCIZ /MFPI INSTRUCTION PUSHED WRONG DATA/ 
3778 0435 115 124 120 E—M31:  .ASCIZ /MTPI INSTRUCTION LOADED WRONG DATA/ 
3779 043563 123 124 101 EM32: .ASCIZ /STACK NOT PUSHED BY MFPI-MTPI/ 
3780 04 113 105 122 EM33:  .ASCIZ /KERNEL PAGE ACCESS INSTEAD OF USER: MFPI-MTPI/ 
3781 043677 115 056 115 EM34: .ASCIZ /M.M. ABORT IN KERNAL D-SPACE HAD WRONG CONDITION/ 
3782 043760 111 114 114 EM35: .ASCIZ /ILLEGAL MODE 10 NOT ABORTED/ 
3783 044014 123 122 060 EM36: .ASCIZ /SRO DID NOT REPORT ILLEGAL MODE 10 CORRECTLY/ 
3784 044071 120 123 127 EM37: .ASCIZ /PSW CHANGED BY AN RTI _ IN USER MODE/ 
3785 044134 101 102 117 EM40: .ASCIZ /ABORT I KERNAL D-SPACE PICKED UP VECTOR FROM I-SPACE/ 
3786 044221 104 040 123, EM41: ASCIZ /D SPACE ENABLE CIRCUITRY HAS FAILED/ 
3787 044265 111 116 103 EM42: ASCIZ /INCORRECT STORE BY MTP INSTRUCTION/ 
3788 0443 124 122 111 EM43: ASCIZ /TRIED TO REFERENCE NON-RESIDENT PAGE/ 
3789 044375 127 122 117 EM44: ASCIZ /WRONG DATA FETCHED BY MFP_INSTRUCTION/ 
790 044443 111 114 114 EM45: ASCIZ /ILLEGAL CSM DID NOT TRAP 10/ 
3791 044502 103 123 115 EM46: ASCIZ /CSM DID NOT ENTER SUPERVISOR MODE / 
3792 044544 103 123 115 EM47: ASCIZ /CSM SET UP WRONG PREVIOUS MODE/ 
3793 044603 103 123 115 —M50: .ASCIZ /CSM SET UP STACK WRONG/ 
044632 103 123 115° EM51: ASCIZ /CSM PUSHED INCORRECT ARGUMENT / 
3795 044670 103 123 115 EMS2:  .ASCIZ /CSM PUSHED WRONG PC/ 
796 044714 103 123 115 EM53: ASCIZ /CSM DID NOT CLEAR OLD PSW BITS <3:0>/ 
3797 044761 103 123 115 EMS4: ASCIZ /CSM ACCESSED WRONG SUPERVISOR SPACE/ 
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114 OLD PSW R6 WAS CPUERR TESTNO 
Vag RO SR2 


ERRORPC/ 
TESTNO ERRORPC/ 


ERRORPC/ 
ERRORPC/ 
ERRORPC/ 


RRORPC/ 
SRO WAS EXPECTD TESTNO ERRORPC/ 
/V.B.A. KIPDR4 SR2 WAS EXPECTD TESTNO ERRORPC/ 
/SR2 WAS EXPECTD TESTNO ERRORPC/ 
ne aes tak tes 


ss 
WMWInon 
AON 


WABDAAWWNONN 
vw 
an 


MNINNMNRNMNN-— 
8 —— oR 
oOo°oo 
ONIN NANPNPNPY 


=" 
Nm 


ERRORPC/ 


RECEIVED/<CRLF> 

/SRO SR2 SRO WAS SR2 WAS TESTNO ERRORPC/ 
/EXPECTED:/<CRLF> 

/PSW PC SRO SR2/<CRLF> 

4170017 (3$+4) 020147 (3$)/<CRLF> 


/RECEIVED:/<CRLF> 

/PSW Cc SR SR2 TESTNO ERRORPC/ 
DATA/<CRLF > 

RECEIVD TESTNO ERRORPC/ 

ERRORPC/ 


ERRORPC/ 
TESTNO ERRORPC EXPECTING 020031/ 
ERRORPC/ 


ERRORPC/ 

ERRORPC EXPECTING XXX340/ 
VIRTUAL/<CRLF > 
ADDRESS TESTNO PC AT ABORT/ 
TESTNO ERRORPC/ 
(MARZ) TESTNO ERRORPC/ 
ERRORPC/ 

TESTNO ERRORPC/ 


ee ed ed et = od =o) 3 


ON -OUIWMOWW 
Be ne 
MWRWPonrn-rwvV 
MNROWWN YIN WO —=WUYINWONOWNN 
OUOWO FS NWONOOCONS 


mn 
N 


SWE NRW 


1 
1 
1 
1 
1 
1 
0 
1 
1 
0 
: 


SOMNNN—-NOWONO 


on 


ING ING NG ING ING ING RIN NG INN IN ee BI ee ee ee BS BSI III 
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ERROR MESSAGES, DATA HEADERS-TABLES & FORMA SEQ 0110 

3837 047336 001260 001262 001256 DT1:  .WORD TRAPPC, TRAPPS,WASR6, CPUERR, TESTNO, SERRPC,0 
047354 001260 001262 001256 DT2: [WORD TRAPPC. TRAPPS.WASR6,WASSRO,WASSR2.TESTNO, SERRPC,0 

3839 047374 001166 001176 001254 DT10:  :WORD $REG2,$TMPO, TESTNO, SERRPC,O 

3840 047406 001264 001170 001166 DT12: .WORD WASSRO,$REGS, $REG2.$TMPO, TESTNO, SERRPC 0 

3841 0474246 001270 001172 001166 DT13: {WORD  WASSR2.$REG4.$REG2,S$TMPO, TESTNO,SERRPC .0 

3842 047442 001162 001172 001264 DT14: [WORD $REGO,$REG4,WASSRO,.WASSR2, TESTNO, SERRPC 0 
047. 001162 001172 001254 DT15: [WORD $REGO.$REG4.TESTNO.SERRPC. 

3844 047472 001162 001172 001264 DT16:  :WORD $REGO.$REG4.WASSRO.S$REGZ, TESTNO, SERRPC.0 

3845 047510 001162 001172 001270 DT17: :WORD  $REGO.$REG4.WASSR2,$REG3, TESTNO,SERRPC .0 
047526 001270 001164 001254 DT20: .WORD WASSR2,$REGI,TESTNO,SERRPC, 

3847 047540 001176 001202 001264 DT21: [WORD $TMPO,$TMP2,WASSRO,WASSR2, TESTNO, SERRPC 0 

3848 047556 001264 001270 001254 DT22: : WASSRO, WASSR2, TESTNO, SERAPC ,0 
047570 001164 001166 001254 DIT24:  :WORD $REG1,$REG2,TESTNO,SERRPC,.O 

3850 047602 001162 001164 001264 DT26: {WORD $REGO.$REG1.WASSRO.WASSR2.TESTNO, SERRPC ,0 
1 047 001164 001170 001264 DT27: [WORD $REG1.$REG3.WASSRO,.WASSR2.TESTNO.SERRPC .0 

3852 047636 001162 001164 001254 DT30: :WORD $REGO.$REG1.TESTNO.SERRPC.0 

3853 047650 001254 001116 D132:  :WORD TESTNO,SERRPC, 

3854 047656 001164 001166 001170 DT34:  :WORD  $REG1,$REG2.$REG3, TESTNO, SERRPC,0 

3855 047672 001264 001164 001254 DT36: [WORD WASSRO,$REGI,TESTNO, SERRPC ,0 

3856 047704 001162 001254 001116 DT40: :WORD $REGO,TESTNO,SERRPC.0 

3857 047714 001264 001266 001270 DT41: [WORD WASSRO,WASSR1,WASSR2, TESTNO,BADPC 0 

3858 047730 001162 001164 001254 DI42: [WORD $REGO,$REG1,TESTNO,SERRPC.0 

3859 047742 001162 001164 001166 DT43: {WORD $REGO.$REG1.$REG2, TESTNO, $ERRPC,0 
047756 001264 001266 001270 DT45: [WORD WASSRO,WASSR1,WASSR2, TESTNO, SERRPC 0 

3861 047772 001256 001254 001116 DT46: [WORD WASR6,TESTNO,$ERRPC, 

3862 050002 001174 001256 001254 D147: {WORD  $REG5.WASR6,TESTNO, $ERRPC.0 

3863 050014 001176 001256 001254 DTSO: ~ WORD STMPO ,WASR6, TESTNO, SERRPC 0 





CKKTBAO 11/44 MEM MGMT PRT B 


ERROR MESSAGES, DATA HEADERS-TABLE 


3865 050026 


0046 
3869 050051 


828888 
888888 


ORMATS 

DFT: BYTE 

DF 2: BYTE 

DFS: BYTE 

DFS: BYTE 

DF12: BYTE 

DF 32: BYTE 
EVEN 
LIST 
~END 


MACRO M1111 25=SEP=79 12:24 PAGE 46 


jelelelele! a) 


SEQ O111 | 


I . 
MACRO M1111 25=SEP=79 12:24 PAGE 46-1 


CKKTBAO 11/44 MEM MGMT PRT B 
SYMBOL TABLE SEQ O112 
ABASE = 000000 BITO2 = 000004 DH37 046730 EM33 043621 KIPDR7= 172316 
ACDW1 = 000000 B1TO3 = 000010 DH40 046770 EM34 043677 KSP =%000006 
ACDW2 = 000000 BITO4 = 000020 DH41 7041 EM35 043760 LF = 12 
ACPUOP= 000000 BITOS = 0 DH42 047145 EM36 044014 LOOP 020456 
ADDWO = 000000 B1T06 = 000100 DH43 047205 EM37 044071 MGMERR 002456 
ADDW1 = 000000 BITO7 = 200 DH44 047255 EM40 044134 MGMFLG 002460 
ADDW10= 000000 B1T08 = 00 DH45 047305 EM41 044221 MMRO = 177572 
ADDW11= 000000 B1TO9 = 001000 DISPLA 001142 EM42 044265 MMRIT = 177574 
ADDW12= 000000 BIT] = 2 DISPRE 000174 EM43 04433 MAR2 = 177576 
ADDW13= 000000 B1T10 = 002000 DSWR = 177570 EM44 044375 3 = 172516 
ADDW14= 000000 BIT11 = 000 DT1 047336 EM45 044443 MMVEC = 000250 
ADDW15= 000000 BIT12 = 010000 DT10 047374 EM46 044502 NDFLAG 00220 
ADDW2 = 000000 BIT13 = 020000 DT12 047406 EM47 044544 NODSPA 002172 
ADDWS = 000000 BIT14 = 040000 DT13 047424 EMSO 044603 PBAHI 001302 
ADDW4 = 000000 B1T15 = 100000 DT14 047442 EMS1 044632 PBALO 001 
ADDWS = 000000 BIT2 = DT15 047460 EMS2 044670 PIRQ = 177772 
ADDW6 = 000000 BITS = 000010 DT16 047472 EMS3 044714 PIRQVE= 000240 
ADDW7 = 000000 BITS = 000020 DT17 047510 EMS4 044761 = 
ADDWS = 000000 BITS = 0 DT2 047354 ERROR = 104 PRI = 
ADDWI = 000000 BIT6 = 000100 DT20 047526 ERRTYP 036564 PR2 = 000100 
ADEVCT= 000000 BIT? = 000200 DT21 047540 ERRVEC= PRS = 000140 
ADEVM = 000000 BIT8 = DT22 047556 GTSWR = 104407 PR4 = 000 
AENV = 000000 BIT9 = 001000 DT24 047570 HT = 11 PRS = 000240 
AENVM = 000000 BPTVEC= 4 DT26 047602 INIT 020564 PR6 = 000 
AFATAL= 000000 CKSWR = 104410 DT27 047620 IOTVEC= 20 PR7 = 000340 
AMADR1= 000000 CMSG 040135 DT30 7636 KDPARO= 172360 PS = 177776 
AMADR2= 000000 CNTRLC 040056 DT32 047650 KDPAR1= 172362 PSW = 177776 
AMADR3= 000000 CPUERR= 177766 D134 047656 KDPAR2= 1 PWRMSG 042222 
AMADR4= 000000 CR = 000015 DT36 047672 KDPAR3= 1 PWRVEC= 00002 
AMAMS1= 000000 CRLF = 200 DT40 0477 KDPAR4= 172370 RDCHR = 104411 
= DDISP = 177570 DT41 047714 KDPARS= 172372 RDLIN = 104412 
AMAMS3= 000000 DF 1 50026 DT42 047730 KDPAR6= 172374 RESREG= 104414 
= 000000 DF12 050051 D143 047742 KDPAR7= 172376 RESVEC= 000010 
AMSGAD= 000000 DF 2 050033 DT45 047756 KDPDRO= 172320 R6 =%000006 
AMSGLG= 000000 DF3 050042 DT46 047772 KDPDR1= 172322 R7 =%000007 
AMSGTY= 000000 DF 32 050057 D147 050002 K = 172324 SAVREG= 104413 
AMTYP1= 000000 DF5 50046 050014 KDPDR3= 172326 SCOPE = 000004 
AMTYP2= 000000 DH1 045026 EMTVEC= 000030 KDPDR4= 172330 SDPARO= 172260 
AMTYP3= 000000 DH10 045176 042264 = 1723 SDPAR1= 172262 
TYP4= 000000 DH12 045236 EM10 2373 KDPDR6= 172334 DPAR2= 172264 
APASS = 000000 DH13 045316 EM11 042443 = 172336 SDPAR3= 17 
APRINI 002020 DH14 04537: EM12 042512 KERSTK= 001100 SDPAR4= 172270 
= 000000 DH15 045456 EM13 042564 KIPARO= 172340 SDPARS= 172272 
APTCSU= 000040 DH16 045516 EM14 042635 KIPAR1= 172342 SDPAR6= 172274 
APTENV= 000001 DH17 045576 EM15 042716 KIPAR2= 172344 SDPAR7= 172276 
APTSIZ= 000200 DH2 045106 EM16 3001 KIPAR3S= 172346 SDPDRO= 172220 
TSPO= 0001 DH20 045656 E 042324 KIPAR4= 172350 SDPDRI= 172222 
= DH21 045716 EM21 043057 KIPARS= 172352 SDPDR2= 172224 
ATESTN= 000000 DH22 046033 EM22 043124 KIPAR6= 172354 SDPDR3= 172226 
AUNIT = DH24 6073 EM23 043173 KIPAR7= 17235 SDPDR4= 172230 
= DH26 046133 EM24 043226 KIPDRO= 172300 SDPDRS= 172232 
AVECT1= 000000 DH27 046245 EM25 043265 KIPDR1= 172302 SDPDR6= 172234 
AVECT2= 000000 DH30 046442 EM26 043332 KIPDR2= 172304 SDPDR7= 172236 
DH32 046517 EM27 34 KIPDR35= 172306 SIPARO= 172240 
BITO = 000001 DH33 046537 EM30 043455 KIPDR4= 172310 SIPAR1= 172242 
BITOO = 1 DH34 6577 EM31 043520 KIPDRS= 172312 SIPAR2= 172244 
BIT01 = 000002 DH36 046670 EM32 043563 KIPDR6= 172314 SIPARS= 172246 


J . 
CKKTBAO 11/44 MEM MGMT PRT B MACRO M1111 25-SEP=79 12:24 PAGE 46-2 
SYMBOL TABLE SEQ 0113 
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CKKTBAO 11/44 MEM MGMT PRT B MACRO M1111 25=SEP=79 12:24 PAGE 46-3 
SYMBOL TABLE 


- ABS. 050062 
000000 001 
ERRORS DETECTED: 0 


VIRTUAL MEMORY USED: 51496 a7 ( 202 PAGES) 
DYNAMIC MEMORY : +o ing ( 78 Paces) 

ELAPSED TIME: 00:10:21 

CKK TBAO.BIN, CKK TBAO. SEQ/CRF =CKKTBAO.MLB/ML , CKKTBAO.P11 


SEQ 0114 





CKKTBAO CREATED BY MACRO ON 25-SEP-79 AT 12:29 PAGE 1 
oe tr REFERENCE CREF D9D YZ SEQ 0115 


ACDw1 


MSW Oo 


YMBOL 
ABASE 
ACDW2 
ACPUOP 
ADDWO 
ADDW1 
ADDW1 
ADDW1 
ADDW1 
ADDW1 
ADDW1 
ADDW1 
no oy | 
ADDWS 
ADDWS 
ADDW6 
ADDW7 
ADDW8 
ADDW9 
ADEVCT 
ADE VM 
AENV 
AENVM 
AF ATAL 
AMADR1 
AMADR2 
AMADR3 
AMADRS 
AMAMS2 


10-578 
10-578 
10-578 


nrnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnne 


EEEEE UTES EEEEEES EE EEEESCESEEESCESEEEEEEESEEEEEE 


10-578 
16-1044 25-2324 


#40~-3744 
37 40-3744 #40-3744 


440-3744 





25-SEP-79 AT 12:29 PAGE 


TBAO AT Y 2 
vm RE FEREN CREF D9D YZ SEQ 0116 


SYMBOL CROSS REFERENCE 
Ss VAL 


RO 


sz = 
3 
29 


45-3857 
38-3437 38-3575 38-3620 


ey 
3333333 


shat 


ee 


MUA MAMI aa 


oo 


39-3637 
38-3317 38-3371 38-3498 38-3542 


Es 


24-2276 24-2282 


a 


Siete 


16-1043 


39-3637 #42-3752 
#39-3726 
4 
40-3743 40-3743 44-3810 44-3814 44-3816 44-3817 
44-3829 
11-638 11-682 11-692 
11-831 


11-663 11-699 11-706 
11-805 11-819 #46-3867 


1 i 
oy 
win 


£8 


#44~-3802 


— set os ss = oe = = 
— sd YS IY SY 
agers 

SRoanw 


444-3807 





CREATED 
ERE 


SESeCE TSS 


(eoetete 
NNNNNS 
= — 
OFNOO 


a ts a as 4 2 4s 8 2 ss 9 4 
NESENO 
Nm 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
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SANNA AAR AAS 
KSXLANASS Spas teeter 


-779 


a = = Ss —§ SS Ss SS SS SS SS YS SS YS YH SH OH 


#43-3761 


. MACRO ON 25-SEP-79 AT 12:29 
REFERENCES 


11-673 


11-771 
11-784 


44-3832 
11-823 


*16-1024 
16-1024 
#45~-3839 


11-674 
#45-3848 
#45-3849 


11-773 
11-785 


11-824 


16-1024 


9 


PAGE 3 
CREF D090 v2 


444-3809 


11-802 11-809 11-816 444-3821 
11-829 844-3823 


444-3833 
39-3636 39-3637 


445-3846 


11-804 #45-3852 
11-830 445-3853 


445-3861 


SEQ 0117 


B 10 


CKKTBAO CREATED BY MACRO ON 25-SEP-79 AT 12:29 PAGE 4 

SYMBOL CROSS REFERENCE CREF D9D YZ SEQ 0118 

SYMBOL VALUE REFERENCES 

EmM10 0423 11-593 443-3763 

EM11 042443 11-599 #43-3764 

EM12 042512 11-605 #43-376 

EM13 25 11-611 11-63 11-641 443-3766 

EM14 042635 11-617 #43-376 

—EM15 042716 11-623 #43-3768 

EM16 3001 11-629 #43-3769 

EM2 042324 11-587 #43-3762 

EM21 043057 11-647 #43-3770 

EM22 043124 11-654 #43-3771 

EM23 043173 11-660 #43-3772 

EM24 043226 11-666 #43-3773 

EM25 043265 11-672 443-3774 

EM26 043332 11-678 443-3775 

EM27 34 11-685 #43-3776 

EM30 345 11-695 443-3777 

—M31 043520 11-702 443-3778 

EM32 043563 11-709 443-3779 

EM33 3621 11-715 #43-3780 

EM34 043677 11-721 #43-3781 

EM35 043760 11-727 #43-3782 

EM36 044014 11-733 443-3783 

EM37 044071 11-739 443-3784 

EM4O 044134 11-745 443-3785 

EM41 044221 11-751 #43-3786 

EM42 044265 11-758 #43-378 

EM43 43 11-764 11-777 443-3788 

EM44 044375 11-770 #43-378 

EM4S 044443 11-783 #43-3790 

EM46 044502 11-789 #43-3791 

EM47 044544 11-795 #43-3792 

EmMSO 044603 11-801 #43-3793 

EMS1 044632 11-808 443-3794 

EMS2 044670 11-815 #43-3795 

EMS3 044714 11-822 443-3796 

EMS4 044761 11-828 43-3797 

ERROR = 104000 #8-525 13-911 13-913 15-982 15-1013 17-1093 17-1101 17-1109 17-1116 
18-1167 8-1175 19-1184 19-1191 19-1225 19-1236 19-1244 19-1303 19-1314 
19-1321 19-1335 19-1377 19=1388 19=1395 19-1409 19-1453 19-1491 19-1500 
19-1524 19-1540 19-1549 20-1595 20-1621 20-1654 21-1684 21-1702 21-1772 
24-22 24-2292 25-234 25-2348 25-2361 25-2373 25-2384 25-2396 25-2411 
25-2424 25-2439 25-2454 27-2492 28-2498 28-2511 2524 30-2536 31-2549 
34-256 34-2580 34-2595 34-261 35-264 35-2661 35-2678 35-2693 35-27 
35-2727 35-2744 35-2763 35-2777 36-2798 36-2816 36-2833 84 36-2864 

~288 36-28 36-2918 36-2932 37-2970 37-2975 37-29 ~ 37-3011 

37-3023 37-3037 37-3050 37-306 37-3080 37-3105 37-3110 37-3123 37-3135 
37-3146 37-3158 37-3172 37-3185 37-31 37-3215 37-3256 37-32 -3277 
38-3287 38-33 38-3330 38-3342 38-3355 38-336 38-3376 38-3396 38-3408 
38-3421 38-34 38-3442 38-3463 38-3470 38-3509 38-3519 38-3529 38-3539 
38-3552 38-3587 38-3597 38-3607 38-3617 38-3629 

ERRTYP 036564 39-3637 39-3639 

ERRVEC = 000004 8-525 16-1024 16-1024 16-1024 *16-1034 *16-1035 39-3636 39-3636 39-3636 





CKK TBAO 


GNS 


=) 


CREATED BY 
SYMBOL CROSS REFERENCE 
SYMBOL VALUE 


eeranre 


NNN NNNN 
nmonronononoenoens 
WWWNWWAWWGW 
NMNNNN 
OAkNO 


me ce a ed ee ed ed ced od eed eed 
NN 
~ 
Ww 
~ 
Las) 


NNNNN 
—NMNoNnon 
wi 


2332 
34 


844 
*37-3246 
364 


48-526 
#8-533 


9-575 
5 


40-3743 


16-1024 
12-858 


*22-1813 


*22-1810 


*17-1074 
*17-1075 
*19-1483 


12-867 
12-845 


*19-1284 


*19-1285 


13-903 


MACRO ON 25-SEP=79 AT 12:29 
REFERENCES 
39-3636 


16-1025 
42-3752 
42-3752 


#42-3752 
40-3743 


16-1024 
*24=2275 


*24-2273 


*24-1967 
*24-1968 
*24-1969 
* 37-3238 


19-1291 
20-1578 
37-2967 


*19-1436 
*19-1457 


*19-1438 


*19-1485 


*13-904 


C 1 


PAGE 5 

CREF D9D YZ 
39-3635 39-3635 
42-3752 42-3752 
42-3752 42-3752 
*24=2280 

*38-3453 *38-3490 
19-1295 19-1308 
20-1600 20-1626 
37-3102 

*21-1677 25-2326 
*24-1970 #242132 
*19-1289 19-1363 
*24-1966  *25-2331 
*35-2687  +*35-2689 
*35-2759 36-2810 
*36-2876 36-2878 
*38-3326 *38-3336 
*38-3402 38-3404 
*38-3622 

*19-1555 

*13-905 *13-916 


\ 


42-3752 
42-3752 
42-3752 


19-1365 
21-1688 


*19-1439 


* 38-3415 


*13-917 


42-3752 
42-3752 
42-3752 


19-1369 
21-1748 


*19-1464 


9 
* 38-3417 


*15-979 


42-3752 
42-3752 
42-3752 


19-1382 
24-2133 


#19-1484 


* 38-3428 


*15-980 


42-3752 
42-3752 
42-3752 


19-1449 
24-2281 


*19-1554 


* 38-34 30 


15-981 


SEQ 0119 


CKK TBAO 


SYMBOL CROSS REFERENCE 
VALUE 


SYMBOL 


CREATED BY MACRO ON 25-SEP-79 AT 12:29 


000012 
020456 
002456 


002460 
177572 


177574 
177576 
172516 


= 000250 


REFERENCES 
985 


#8-525 


*15=-1007 


* 39-3696 
40-3743 
17-1139 


*38-3288 


PAGE 


6 
CREF D9D YZ 


alot ett 


*39-3697 


19-1208 
25-2443 
38-3540 


*16-1042 


* 38-3316 


* 39-3703 


19-1249 
34-2599 
38-3618 


*17-1089 


*24-2269 
38-3374 


38-3297 
*17-1139 


* 38-3370 


*15=1015 


39-3705 
19-1344 


35-2768 


*17-1120 


*38-3317 
*78-1158 


* 38-3382 


0 
* 39-3706 


19-1418 
36-2923 


*18-1163 


36 
+38-3371 
*19-1208 


0 
* 38-3436 


d+ ah 


39-3664 
*39-3709 
19-1465 


37-3068 


*19=1195 


*38-3383 
*19-1222 


* 38-3497 


*37-3220 
*38-3323 
38-3457 
*38-3551 
* 39-3689 
*39-3710 


19-1556 
37-3203 


*19-1223 


38-3294 


*24-2248 
* 38-3437 


*19-1249 


5 
* 38-3540 


SEQ 0120 





CKK TBAO CREATED BY MACRO ON 25-SEP=79 AT 12:29 PAGE 7 

SYMBOL CROSS REFERENCE CREF D9D YZ SEQ 0121 

SYMBOL VALUE REFERENCES 

PR2 = 000100 #8-525 

PR3 = 000140 #8-525 

PRS = 000200 #8-525 

PRS = 000240 #8-525 

PR6 = 000 #8-525 

PR7 = 000340 #8-52 

PS = 177776 #8-525 8-525 

PS = 177776 #8-525 14-931 14-933 *16-1029 *16-1031 *16-1033 17-1091 = #17=1124 0 #17=1129 
*#17-1135 = #17=1137 8=1165 = #191199 #19=1206 = #19=1206 = *19=1224 = *20-1577 = *20- 1585 
20-1592 = 20-1594 = 20-1599) *20-1602 39 20-1604 3 3=* 20-1611 20-1618 *20-1620 *20-162 
*20-1628 *20-1630 *20-1645 20-164 *20-1651 9 #21-1738 = #21-17467 —#21-1749) #21-1751 
*24-2148 = *24-2206 = 24-2251 24-2277 24-2279 = #252335) = #252355 = * 25-2367 = * 25-2379 
*25-23 *25=2404 = #25=24618 = *25=2431 = 26-2483 = **28-2505 §3=—_ 2B = 2517 25 #31-2543 
*31-2557 *34-257 *34-258 *35=2636 35-264 *35-2 *35-2 *35-2699 35-2716 
*35-2734 35-2751 *36-2791 +*36-280 *36-2823 36-2839  +*36-285 *36-2871 +*36-2889 
*36-2906 *37-2954 *37-2962 =. 37-2981 = 37-2994 = 37-3006 )§= *357-3017 = * 37-3030) §3= #337 - 3044 
*37-3057 37-3069 *37-3089 = 37-3097) = *37=3116 = *37=3129) = #37-3141 = 37-3152 = *357- 3165 
*37=3179 = 37-3192) = *37-3204 = 37-3250 )§=. 357-3260 )3=—s *37-3270)3=—_ * 358-3281 3=s * 38-3320 §=. * 38-3333 
* 38-334 38-3358 38-3386 *38-3399 38-3411 38-3424 3454 38-3503 *38-3513 
*38-3523 =*38-3533) = * 38-3581 =. 338-3591 = 38-3601 = * 38-3611 = 38-3621 

PWRMSG 042222 42-3753 = #42-3754 

PWRVEC = 00002 #8-525 16-1024 16-1024 42-3753 42-3753 42-3753 42-3753 42-3753 42-3753 

RDCHR == 104411 39-372 #42-3752 

RDLIN = 104412 #42-3752 

RESREG = 104414 41-3750 #42-3752 

RESVEC = 000010 #8-525 16-1024 16-1024 16-1024 

R6 =%000006 #8-525 *16-1024 *16-1024 16-1024 

R7 =%000007 #8-525 

SAVREG = 104413 41-3750 #42-3752 

SCOPE = #8-5S25 17-1071 18-1151 19-1220 19-1283 19=1359 19-1435 19-1482 20-1574 
20-1641 21-1676 21-1727 22-1805 24-1964 24-2144 24-2202 24-2261 25-2323 
26-2474 35-2631 36-2785 37-2952 37-3087 37-3233 38-3314 38-3379 38-3452 
38-34 38-3568 39-3635 

SDPARO = 172260 #8-526 12-870 

SDPAR1 = 172262 #8-526 

SDPAR2 = 172264 #8-526 

SDPAR3 = 172266 #8-526 

SDPAR4 = 172270 #8-526 * 38-3487 

SDPARS = 172272 #8-526 

SDPAR6 = 172274 #8-526 

SDPAR7 = 172276 #8-526 

SDPDRO = 172220 #8-526 

SDPDR1 = 172222 #8-526 *24-2145 *24-2156 

SDPDR2 = 172224 #8-526 

SDPDR3 = 172226 #8-526 

SDPDR4 = 172230 #8-526 *37-3239 38-3494 +*38-3576 - 

SDPDRS5 = 172232 #8-526 

SDPDR6 = 172234 #8-526 

SDPDR7 = 172236 8-526 12-853 

SIPARO = 172240 #8-526 12-869 *20-1608  *20-1627 

SIPAR1 = 172242 #8-526 

SIPAR2 = 172244 #8-526 


CKK TBAO 


SYMBOL CROSS REFERENCE 
SYMBOL VAL 


CREATED BY MACRO ON 25-SEP=79°AT 12:29 


NNNNNNNNN 
~iroronoreunororor 
™m mr 


177576 


172516 
%000006 


001100 
020000 
177774 
000700 
001140 


REFERENCES 
#8-526 


#8-525 


*17=1076 
#17-1077 


132859 


*26=2157 
*17-1086 


*25=2327 


*24=2191 
*18-1160 


8-54 
42-3753 
20-1612 

*16-1024 
39-3636 


16-1025 


8-539 
#16-1024 
16-1030 


p 
C 


AGE 8 
REF 


*35-2632 


9- 
35-2775 


*20-1629 
«37-3008 
8-541 


20-1629 
16-1024 
39-3637 


39-3722 


D9D YZ 


*37-2961 


17-1105 
*19-1399 
*21-1706 

36-2929 


19-1181 
19-1510 
36-2930 


25-2336 
* 37-3020 
16-1024 


25-2340 
*16-1024 
39-3637 


39-3722 


* 37-3071 


19-1180 
19-1406 
21-1744 
* 36-2931 


19-1241 
19-1515 
37-3078 


*35-2638 
* 37-3034 
16-1028 


35-2648 
*16-1024 
39-3637 


* 38-3380 


19-1232 


37-3077 


19-1310 
19-1534 
37-3213 


35-2639 
* 37-3047 
38-3455 


37-2964 
16-1025 
39-3637 


* 38-3491 


#19=1248 
#19=1457 
25-2451 
* 37-3079 


19-1333 
19-1545 


* 35-2649 
* 37-3061 
38-3474 


39-3635 
39-3722 


19=1309 
19-1509 
#25-2453 
37-3212 


19-1384 
21-1691 


37-2964 


39-3636 
39-3722 


SEQ 0122 





CKK TBAO 
SYMBOL 
SYMBOL 
Sw3 


TRAPPS 


CROSS REFERENCE 
AL 


CREATED BY MACRO ON 25-SEP=79 AT 12:29 


REFERENCES 
#8-525 


16-1034 
*15-983 


20-1575 
20-1633 


16-1024 


#26-2474 


#37-3233 


#38-3314 
#38-3379 
#38-3452 


14-936 


45-3855 


20-1631 
*16-1039 


21-1728 
21-1784 


16-1024 


PAGE 9 
CREF D9D YZ 
14-949 
14-951 #14-952 
45-3838 45-3839 
45-3847 45-3848 
45-3856 45-3857 
21-1707 21-1779 
24-2262 
*15-$79 15-986 
25-2459 34-2605 
*37-3210 37-3220 
45-383 
*15-980 15-985 
25-2458 *34-2606 
*37-3211 37-3219 
45-3838 


#16=1061 


45-3840 
45-3849 
45-3858 


*15-1007 
34-2615 
* 38-3298 


*15-1008 
34-2614 
* 38-3299 


45-3841 
45-3850 
45-3859 


15-1016 
*35-2772 
38-3302 
15-1015 


*35-2773 
38-3301 


45-3842 
45-3851 
45-3860 


*19-1330 
35-2782 
* 38-3550 


#19=1331 
35-2781 
* 38-3551 


45-3843 
45-3852 
45-3861 


19-1339 
*36-2928 
38-3553 


SEQ 0123 


CKK TBAO 

SYMBOL CROSS REFERENCE 
SYMBOL V 

TST33 034726 
TST3%4 035314 
TST4 021520 
TSTS 022022 
TST6 022310 
TST7 022476 
TYPBN = 10446 
TYPDS = 104405 
TYPE = 104401 
TYPOC = 104402 
TYPON = 104404 
TYPOS = 104403 
UDP. = 177660 
UDPAR1 = 177662 
UDPAR2 = 177664 
UDPAR3 = 177666 
UDPAR4 = 177670 
UDPARS = 177672 
UDP. = 177674 
UDPAR? = 177676 
UDPDRO = 177620 
UDPDR1 = 177622 
UDPDR2 = 177624 
UDPDR3 = 177626 
UDPDR4 = 177630 
UDPDRS = 177632 
UDPDR6 = 177634 
UDPDR7 = 177636 
UIPARO = 177640 
UIPAR1 = 177642 
UIPAR2 = 177644 
UIPAR3 = 177646 
UIPAR4 = 177650 
UIPARS = 177652 
UIPAR6 = 177654 
UIPAR7 = 177656 
UIPDRO = 177600 
UIPDR1 = 177602 
UIPDR2 = 177604 
UIPDR3 = 177606 
UIPDR4 = 177610 
UIPDRS = 177612 
UIPDR6 = 177614 
UIPDR7 = 177616 
USESTK = 000600 
USP =%000006 


* 36-2804 


#38-3568 


#42-3752 
39- 


* 38-3571 


*24-2203 


*37-3240 


12-875 


*17~1078 
*17-1079 


12-855 


*21-1731 
*17-1087 


16-1032 
*16-1032 
37-3099 


CREATED BY MACRO ON 25-SEP=79 AT 12:29 


FERENCES 
w58-s084 


39-3722 


#24-2214 


* 38-3492 


*20-1582 


#21-1729 
*21-1730 


H 10 


PAGE 10 
CREF D9D v2 
39-3734 #462-3752 
39-3635 39-3637 
39-3707 39-3713 
39-3722 39-3722 
39-3722 39-3722 
42-375 
39-3731 #42-3752 
* 38-3545 
*20-1601 
*26-2476 *36-2787 
#24=2215 = *24=2249 
*21-1732 *36-2786 
20-1603 21-1750 
*20-1603 *21-1739 
*37-3120 37-3132 


39-3637 


39-3728 


* 37-3096 


27-2489 
*21-1750 
* 37-3143 


39-3732 


* 37-3206 


36-2803 
26-2484 
# 37-3155 


40-3743 


# 37-3241 


37-3099 
* 36-2793 
* 37-3169 


40-3745 


«38-3381 


36-2794 
#37-3182 


SEQ 0124 


I 10 


CREATED BY MACRO ON 25-SEP-79 AT 12:29 PAGE 11 
D9D YZ 


CKK TBAO 


SYMBOL CROSS REFERENCE CREF SEQ 0125 
SYMBOL VALUE FERENCES 
#37=3196 *38-3584 *38-3594 *38-3604 *38-3614 
VIRT1 001276 #10-578 
WASR6 001256 #10-578 *15-981 *15=1009 45-3837 45-3838 45-3861 45-3862 45-3863 
WASSRO 1 #10-578 *13-906 -909 #15-1010 #*17=-1105 17-1107 *19=1180 19-1182 #191232 
19-1234 *19-1309 19-1312 #19-1332 19-1383 19-1386 *19-1406 *19=1514 19=1516 
*19-1530 19-1531 *21-1690 ¢i-1S2? #21-17464 21-1763 = #25= 2451 #34-2607 35-2774 
*36-2929 = 37-3077) = #337=3212 0 3=s * 38-32 * 38-354 * 38-3624 45-3838 45-3840 45-3842 
45-3844 45-3847 45-384 45-3850 45-3851 45-3855 45-3857 45-3860 
WASSR1 001266 #10-578 *13-907 * 38-329 #38-3548 38-3625 45-3857 45-3860 
WASSR2 001270 #10-578 *13-908 *15=-1011 *17=1106 17-1114 #19=1181 19-1189 = #19=1241 19=1242 
*19=1310 19-1319 #19-1333 *19-1384 19-1393 *19+1407 *19-1450 19=1451 #19=1487 
19-1489 *19-1496 19-1498 19-1515 19-1519 #19-1534 19-1535 #*19=1545 19-1547 
*21-1691 21-1697 =#21=-1745 21-17 #25-2452 34-260 #35-2775 +*36-2930 *37-3078 
*37=3213 *38-3296 *38-3549 *38-3626 45-3838 45-3841 45-3842 45-3845 45-3846 
45-3847 45-3848 45-3850 45-3851 45-3857 45-3860 
WASSR3 001272 #10-578 * 38-3297 
WIT = 000100 #8-537 
SAPTHD 000204 9-577 #9-577 
GASTAT = eeenee 40-3744 40-3744 
SATYC 05 40-3744 #40-3744 
SATY1 040540 #40-3744 
SATY3 040546 40-3743 #40-3744 
SATYS 040556 39-3637 #460-3744 
SAUTOB 11 #10-578 *16-1025 39-3722 39-3722 39-3722 
$BDADR 001122 #10-578 
SEDDAT 001126 #10-578 
SBELL 001214 #10-578 39-3637 39-3637 39-3637 
$BIN 1 *40-3745 +%40-3745 40-3745 #60-3745 
SCHARC 0534 #40-3743 40-3743 40-3743 *40-3743 #40-3743 
SCKSWR 037072 #39-3722 42-3752 42-3752 
SCLR.T 0 6 39-3635 #39-3635 
SCMT 001100 #10-578 16-1024 16-1024 16-1024 16-1024 16-1024 16-1024 
$CM1 = #10-578 10-578 10-578 #10-578 10-578 10-578 #10-578 10-578 10-578 
ry a 10-578 10-578 #10-578 10-578 10-578 #10-578 10-578 10-578 
$CM2 = 000014 #10-578 10-578 10-578 #10-578 10-578 10-578 #10-578 10-578 10-578 
Ay a Yh 10-578 10-578 #10-578 10-578 10-578 #10-578 10-578 10-578 
$CM3 = 000006 #10-578 10-578 10-578 
SCM4 = 000006 #10-578 10-578 10-578 #10-578 10-578 10-578 #10-578 10-578 10-578 
PAS a Te 10-578 10-578 #10-578 10-578 10-578 #10-578 10-578 10-578 
SCNTLC 001312 #10-578 39-3722 39-3722 39-3722 39-3722 
SCNTL3 0027 39-3722 #39-3722 
SCNTLU 0022 39-3722 39-3722 #39-3722 
$CPUOP 001252 #10-578 
SCRLF 001221 #10-578 39-3635 39-3637 39-3637 39-3637 39-3639 39-3658 39-3663 39-3718 
39-3722 39-3722 39-3722 39-3722 40-3743 40-3743 40-3743 
$DBLK 041524 41-3748 41-3748  #41-3748 
$DB20 041630 39-3690 39-3704 #41-3750 
SDEVCT 001234 #10-578 
$SDOAGN 0 39-363 39-3635 39-3635 #39-3635 


J1 
D9D vz 


CKKTBAO CREATED BY MACRO ON 25-SEP-79 AT 12:29 PAGE 12 
SYMBOL 


SEQ 0126 


S 
#41-3748 
16-1025 
#39-3635 


16-1025 


3 
*16-1024 
#10-578 


40-3743 


42-3752 
8-523 


*16-1024 
*16-1024 


0 
*37-3029 *37-3043 


CROSS REFERENCE CREF 
VALUE 


#39-3635 


39-3637 


* 39-3635 
* 39-3636 


40-3744 
40-3743 
40-3743 


42-3752 
8-523 


#42-3753 
39-3722 
39-3637 
39-3637 

* 37-3234 


*17-1088 


 36— 
* 37-3056 


39-3637 


40-3743 
40-3743 


45-3861 


* 39-3637 
39-3637 


*40-3744 
40-3743 


39-3722 
39-3637 
39-3722 


* 38-3485 
*17-1138 


2 
* 37-3070 


40-3744 
40-3744 


39-3637 


440-3744 


39-3722 
39-3637 
39-3722 


* 38-3569 
*18-1162 


* 37-3088 


40-3744 


* 39-3637 


39-3645 
45-3845 
45-3854 


39-3637 


39-364 


2 
39-3722 40-3743 


«39-3636 
*19-1207 


* 39-3636 
*19-1221 


3 
*37-3128 


* 37-3115 


39-3637 


45-3837 
45-3846 
45-3855 


40-3743 


39-3636 
*19-1250 


*37-3140 





CKK TBAO 
SYMBOL CROSS REFERENCE 
SYMBOL VALUE 


#10-578 


0-3 


40-3744 
#39-3722 


40-3743 


39-3636 
*16-1024 
#42-3753 
42-3753 

39-3637 

42-3752 

42-3752 

39-3722 
*39-3637 


* 39-3637 


CREATED BY MACRO ON 25-SEP-79 AT 12:29 


#37-3191 


#10-578 

40-3744 
40-3744 

#40-3744 


40-3743 


#40-3746 
40-3746 


39-3636 
* 39-3635 


42-3753 
39-3637 


42-3752 
42-3752 


45-3842 
45-3846 
45-3839 


45-3840 
45-3841 


PAGE 13 
CREF 


ae $4 
# 38-3544 
* 38-3502 
*38-3610 
16-1024 


#40-3744 


40-3744 


40-3743 


*40-3746 
#39-3636 
* 39-3635 


39-3722 


45-3843 
45-3849 
45-3840 


45-3845 
45-3842 


D9D YZ 


*38-3619 


16-1025 


#40-3744 


#18-1151 


38-3452 


*40-3746 
39-3635 


39-3722 


45-3844 
45-3850 
45-3841 


45-3851 
45-3843 


#37-3249 
* 38-3369 
# 38-3522 
39-3636 


39-3636 


4 
#38-3484 


440-3746 
39-3635 


39-3722 


45-3845 
45-3851 


45-3844 
45-3854 


45-3844 


*37-3259 
* 38-3385 


39-3637 


#18-1151 


38-3484 


39-3635 


39-3722 


45-3850 
45-3852 
45-3849 
45-3845 


* 37-3269 
*38-3398 
* 38-3541 
39-3636 


40-3743 


18-1151 


39-3726 


40-3743 


45-3852 
45-3854 
45-3854 


#19=1220 


40-3743 


45-3856 
45-3855 
45-3859 


SEQ 0127 





CKK TBAO 
SYMBOL CROSS REFERENCE 
SYMBOL VALUE 
SREGS 001174 
SRE SRE 041572 
SRTNAD 936126 
SRTRN 036122 
SR2A = eeeene 
SSAVRE 041534 
SSAVR6 042220 
SSCOPE 036134 
SSETUP = 000137 
SSTUP = 177777 
SSVLAD 036256 
SSVPC) = 000204 
SWR = 173400 
SSWREG 001246 
SSWRMK = 
STBIT 001310 
STESTN 1230 
$Tk8 001146 
STKS 001144 
STMPO 001176 
STMP1 001200 
STMP2 001202 
STMP3 001204 
STMPS 001206 
STMP5S 001210 
STN = 000035 


CREATED BY MACRO ON 25-SEP-79 AT 12:29 


*39-3637 
13-3989 
*16-1024 


42-375 
oth-kc' 


9 
*37-3031 


«39-3701 
«39-3702 


45-3862 


*16-1024 


42-375 
#42-375 


#9-574 


9-574 
16-1024 
39-3635 


9-574 


8-524 
39-3636 
*39-3635 


39-3722 
39-3722 


17-1121 
*21-1762 


*19-1518 


37-3032 


39-3703 


21-1676 


PAGE 14 
CREF D9D YZ 
39-3635 #39-3635 
#42=3753 = #42-3753 
9-574 #9~-576 
#9-576 16-1024 
16-1024 16-1024 
39-3636 39-3637 
9-574 #9-574 
9-576 99-576 
8-524 8-524 
10-578 16-1024 
19-1283 19-1359 
24-1 24-2144 
37-3087 37-3233 
39-3635 39-3635 
3636 3636 
39-3636 3636 
39-3637 39-3637 
8-524 8-524 
39-3636 39-3636 
39-3635 39-3635 
39-3722 39-3722 
39-3722 39-3722 
17-1126 18-1165 
*#21-1765  *21-1769 
#19=1521 19-1522 
1-1700 
#25-2605 25-2406 
#35-2719 35-2753 
#37-3058 37-3059 
«39-3727 39-3733 
17-1071 =-#17-1071 
19-1283 #19-1283 
19-1482 #19-1482 
21-1676 421-1676 


9-574 

16-1024 
16-1024 
39-3637 


#42-3753 


39-3722 
39-3722 


19-1196 
21-1770 


#19-1528 
*25-2432 


35-2755 
*37-3166 


39-3722 
39-3722 


19-1201 
45-3839 


*19-1533 
25-2433 


36-2873 
37-3167 


9-574 
16- 


40-3743 
39-3722 


*39-1509 
45-3840 


*19-1537 
*32-2559 


* 36-2874 
*37-3193 


#18-1151 


#21-1727 


#9-576 


39-3722 


9-574 
9-574 


40-3743 
39-3722 


19-1516 
45-3841 


SEQ 0128 


M10 
CKKTBAO CREATED BY MACRO ON 25-SEP-79 AT 12:29 PAGE 15 
SYMBOL a1 Naeem CREF D9D YZ SEQ 0129 





SYMBOL 
4-1964 24-1964 24-2144 46-2144 24-2144 4-2202 
4-2261 #24-2261 37$3¢7 5-2323 #25-2323 5=2446 
-260 5-2631 52631 #35-2631 5-2769 785 
7-295 7- 3 #37-2952 37-3072 7-3087 37-3087 
7- $3 #37-323 38-3292 38-3314 38-3314 #38-3314 
#38-3379 3438 38-3452 3452 #38-3452 38- 
38-35 38-3568 #38-3568 
STPB 001138 40-374 
STPFLG 00115 10-5 40-3743 
STPS 001150 #10-578 40-3743 40-3743 40-3743 
STRAP 041750 16-1024 #42-3752 
STRAP2 041772 #42-3752 $$-3525 
STRP = 000015 #42-3752 42-375 42-3752 42-3752 42-3752 #42-3752 42-3752 42-3752 42-3752 
42-3752 #42-3752 42-3752 42-3752 42-3752 42-3752 #42-3752 42-3752 42-3752 
42-3752 42-3752 #42-375 42-3752 42-3752 42-3752 42-3752 #42-3752 42-3752 
42-3752 42-375 42-3752 #42-3752 42-3752 42-3752 42-3752 42-3752 #42-3752 
42-3752 42-3752 42-37 42-3 #42-3752 42-3752 42-3752 42-3752 42-3752 
#42-3752 42-3752 42-3752 42-3752 42-3752  #42-3752 42-3752 42-3752 42-3752 
42-3752 #42-3752 42-3752 42-3752 42-3752 42-3752 #42-3752 
STRPAD 042004 42-3752 #42-3752 
$STSTM 000210 #9~-577 
STSTNM 001102 #10-578 *39-3635 39-3636 39-3636 *39-3636 39-3636 39-3636 39-3636 39-3636 
39-3637 39-3637 39-3637 39-3637 39-3729 
STTYIN 040012 39-3722 39-3722 39-3722 39-3722 39-3722 #39-3722 
$TYPBN 041006 #40-3745 42-3752 42-3752 
STYPDS 041310 #41-3748 42-3752 42-3752 
STYPE 040206 #40-3743 40-3744 42-3752 42-3752 
STYPEC 040420 39-3722 40-3743 40-3743 40-3743 #40-3743 40-3743 
STYPEX 040536 40-3743 40-3743 #40-3743 
STYPOC 041106 #40~-3746 42-3752 42-3752 
STYPON 041122 40-3746 #40-3746 42-3752 
$TYPOS 041062 #40-3746 42-3752 
SUNIT 001236 #10-578 
SUNITM 214 577 
SUSUR 001250 #10-578 
SXTSTR 036146 439-3636 
$$GET4 = 000001 #39-3635 #39-3635 39-3635 
SOF ILL 041305 #40-3746 40-3746 40-3746 #40-3746 
S4OCAT = seenee 39-3636 39-3637 
-SASTA = weenee 40-3744 40-3744 
- $x = 000204 #9-577 9-577 


CKK TBAO 


#40-3744 
39-3637 
42-3752 


#17-1051 
#19-1283 
#20-1641 


#24-2144 = 24-2144 


yn iA, 4 MACRO ON 25-SEP-79 AT 12:29 


16-1025 


#36-2785 
#77~3087 


#38-3379 


18-1151 
5 
#40-3744 


42-3752 
42-3752 


34-2602 


#24~2202 


19-1220 
4-1964 
#40-3744 


42-3752 


35-2769 


#9~577 
#14-930 
#17-1071 
#19-1359 
#21-1676 
#24-2202 


PAGE 16 


CREF D9D YZ 


19-1283 


#41-3748 


42-3752 


36-2924 


#242261 


19-1359 


#41-3749 


42-3752 


37-3072 


#10-578 


#24-2261 


19-1435 
3 
442-3753 


42-3752 


37-3207 


#10-578 
#15-963 
#19-1220 
#19-1482 
#22-1805 
#25-2304 


1482 
23-259 3 
38-3484 


#42-3753 


42-3752 


38-3292 


#10-578 


#25~2309 


20-1641 
35-2631 


42-3752 


964 
#25-2323 





CREATED 4 


#8-516 


26-2474 
#37-3233 


#38-35 
#40-3745 
#16-1024 


#39-3635 
#16-1025 


#39-3722 


41-3748 


MACRO ON 25-SEP-79 AT 12:29 


#35-2631 
38-33 


16-1024 


#39-3635 


#39-3635 


#10-578 
10-578 


#18-1151 


435-2631 
438-3314 
439-3636 
#41-3748 


#10-578 
10-578 


#19-1220. 


#24-1964 
#37-3233 
42-3752 


#35-2769 


8-525 
8-525 
8-525 
8-537 


PAGE 17 
CREF 


#36-2785 


# 
441-3749 


#10-578 
10-578 


#19-1283 
424-2164 
#38-3314 

42-3752 


436-2924 


8-525 
8-525 
8-525 


8 
D9D YZ 


436-2785 


441-3750 


#10-578 
10-578 


#19-1359 
#24-2202 
#38-3379 

42-3752 


#37-3072 ° 


8-525 
8-525 
8-529 


#10-578 
10-578 


#19-1435 


42-3752 


#37-3207 


8-525 
8-525 
8-530 


#37-2952 
#38-3452 
#39-3722 
#42-3753 


#19-1482 


42-3752 


438-3292 


8-525 
8-525 
8-531 


#42-3753 


#20-1574 


42-3752 


#38-3372 


8-525 
8-525 
8-532 


437-3087 
438-3484 
#40-3743 


420-1641 
#35~-2631 


42-3752 


438-3438 


8-525 
8-525 
8-533 


SEQ 0131 








CKK TBAO CREATED BY MACRO ON 25-SEP-79 AT 12:29 PAGE 18 
MACRO CROSS REFERENCE CREF D9D YZ SEQ 0132 
8 apes 


515 40-3743 
#8-516 40-3746 





